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PREFACE 

t 

JOSS is a computing system developed at RAND to pro- 
vide the individual scientist or engineer with a personal 
computational service, immediately available whenever re- 
quired, in his own working environment. The system con- 
sists of a central computer containing the JOSS software 
and a number of typewriter consoles connected to the com- 
puter via telephone lines. The central computer turns its 
attention rapidly from console to console, in such a way 
that each user seems to have exclusive use of the system. 

From the engineer's point of view, JOSS is a problem- 
solving tool that he can use in solving numerical prob- 
lems with a minimum investment on his part in learning its 
use. This memorandum introduces the basic principles of 
JOSS operation through examples and discussion, includ- 
ing a step-by- step demonstration of the features of the 
system that the reader may try for himself. These princi- 
ples are presented in a sequence designed to enable the 
engineer to solve progressively more involved scientific 
problems. In addressing itself to an audience of users 
with access to the system, the memorandum assumes that the 
reader is familiar with the mechanics of the operation of 
the JOSS console. This background may be gained either 
from a short demonstration at a JOSS console or by a read- 
ing of pages 7-13 of C. L. Baker's JOSS; Introduction to a 
Helpful Assistant (The RAND Corporation, RM-5058-PR, July 
1966) . 

T 

JOSS is the trademark and service mark of The RAND 

Corporation for its computer program and services using 

that program. 
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i v PREFACE 

This document, as originally published in August 1966 
under the title Problem- Solving with JOSS , was written by 
E. P. Gimble, an electronics engineer with the Service 
Engineering Division, Sacramento Air Materiel Area, 
McClellan Air Force Base, California. In recognition of 
the value of this text to engineers, C. L. Baker has pre- 
pared the present version for publication in the RAND 
series of JOSS documentation, a part of The RAND Corpora- 
tion's continuing program of research in computer sciences 
under U.S. Air Force Project RAND. 



SUMMARY 

JOSS, RAND's interactive, remote computing system, is 
designed to provide engineers with the ability to solve 
complex numerical problems. The JOSS language is easy to 
learn and easy to use, with relatively few rules governing 
correct use. To use JOSS in the solution of numerical 
problems, the engineer needs only to express the required 
answers in terms of formulas and to specify the values of 
the parameters involved. The formulas and values are en- 
tered into JOSS through a typewriter keyboard. 

This memorandum begins with an overview of the JOSS 
system, including descriptions of the console, the language, 
and the basic principles of operational procedure. Examples 
of JOSS input and output are used to demonstrate step by 
step how the basic commands, both direct and indirect, are 
applied. 

Direct commands are used to solve problems when only 
a few answers are required. On presentation of a direct 
command, JOSS immediately performs the requested action. 
If formulas or values are misused or missing, JOSS responds 
with a message indicating the trouble. 

Indirect commands are used to solve problems when many 
answers are required, when many variables are to be set, or 
when a number of steps must be performed in a prescribed 
sequence. A command becomes indirect when it is prefixed 
by a step number, indicating its position within a sequence. 
The step number is, in effect, a request for JOSS to store 
the command for interpretation and execution when the step 
is reached in the course of a program. 

The versatility of JOSS as an aid in solving complex 

v 



vi SUMMARY 

problems is demonstrated by a discussion of special tech- 
niques. Such techniques include choosing between several 
acceptable commands, minimizing function arguments, and 
directing JOSS to "dress up" output with headings and con- 
densed printout. The interactive use of JOSS in correcting 
program errors is also discussed, including explanations 
of error messages that may arise. 

A JOSS filing system provides long-term storage for 
programs and data. This system eliminates the need for 
retyping frequently used material and allows a program to 
be constructed gradually over a period of time. 

The appendices to this memorandum consist of a list of 
legitimate JOSS commands, both direct and indirect, includ- 
ing rules of form and notes applicable to the commands; a 
description of the use of expressions and propositions; and 
a discussion of the available JOSS functions. 
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AUTHOR ' S PREFACE 

■— ^^— - ^ «i , j ■i n , p, ■» i , 

JOSS is a "computing aid interacting with the user by 
means of a simple language." The aim of this document is 
to acquaint the reader with the language and the manner of 
interaction to give him the immediate ability to solve 
problems on JOSS. Our method is to enumerate the various 
JOSS commands and to show, by examples and discussion, 
JOSS's response to each of them. With an understanding of 
these basic principles, the user should be able to solve 
progressively more involved scientific problems. If pos- 
sible, he should actually use JOSS during the reading of 
this document and immediately apply the principles being 
discussed. He should try the examples, inserting various 
expressions, and also solve real problems with JOSS. 

Machine limitations have not been fully described. 
These will be pointed out in the form of error messages 
from JOSS as the need arises. 

The JOSS language is summarized in the appendices. 
The material for this section was drawn almost entirely 
from JOSS: One-page Summary , JOSS Functions: A Brief 
Description , and What's New in JOSS II , informal memos 
prepared by The RAND Corporation. The remainder of the 
material in the document is an expansion of the above memos 
together with information the author has learned directly 
from using JOSS. 



August 1966 E. P. Gimble 

McClellan Air Force Base 
Sacramento, California 
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Chapter 1 
WHAT IS JOSS? 

1.1. THE JOSS 1 " SYSTEM 

JOSS is an on-line, time-sharing computer system de- 
veloped by The RAND Corporation for direct use by engineers 
without the assistance of programmers. Terminals are con- 
nected through individual multiplexor lines to the computer. 
Inputs are accepted one typed line at a time. Multiplexor 
lines are rapidly sampled in sequence by the computer so 
that outputs are generally as fast as the IBM typewriter 
that gives the printout. 

The console control box at each input /output console 
has an on/off switch that clears the immediate memory allot- 
ted to that console and automatically causes a request for 
operator identification. The only other panel switch is an 
interrupt button with which the user may stop JOSS to make 
changes in the midst of a program or computation. Also in- 
cluded are green and red lights that indicate, respectively, 
user control and JOSS control of the typewriter. Three white 
lights indicate "system on," "console on," and "typewriter 
on. 

The typewriter has a standard IBM keyboard, altered by 
the addition of a few special mathematical symbols. Its 
operation is much like any electric model, but pressing a 
key causes the associated electronics to transmit a coded 
character to the computer. Striking the carrier return key 



JOSS is the trademark and service mark of The RAND 
Corporation for its computer program and services using 
that program. 



2 1. WHAT IS JOSS? 

gives console control to the computer, thus presenting a 
complete line for interpretation. 

There are three typewriter adjustments with which we 
should be familiar. The platen pressure lever located on 
the upper right should be positioned to the rear . The 
double space lever is next to it and should be positioned 
forward . The pag^e adjust knob is on the left platen roller 
and should be positioned JLn. The page is adjusted so as 
to receive its typed heading on the top line by pulling out 
the knob, rolling to the correct position, and pressing in 
the knob. 

1.2. THE LANGUAGE 



Appendix A lists all the legitimate JOSS commands. 
Each command occupies a single line and is presented by 
striking the carrier return key. 

On presentation of a direct command , JOSS immediately 
takes the requested action and then returns control to the 
user. The direct command is not stored. 

A command becomes indirect when it is prefixed by a 
step number (mixed decimal number) . The presentation of 
an indirect command is, in effect, a request for JOSS to 
store the command. JOSS will interpret and execute the 
indirect command when that step is reached in the course 
of a program. A program is a step or set of steps (in- 
direct commands) to be performed in a specified order. 

The 26 upper- and 26 lower-case English letters are 
used as identifiers . Each of the 52 identifiers may be 
defined as a variable, function, or proposition. An iden- 
tifier must always be a single letter. A definition is 
changed (or corrected) by simply reusing the identifier. 
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We shall define an expression as one number or identi- 
fier or a combination of numbers and/or identifiers and/or 
JOSS functions (App. C) that is reducible to a number when 
JOSS is called on to use it. Thus, the term "expression" 
used alone will mean "mathematical expression reducible 
to a number." The usual mathematical symbols 

! I, [ 3, (),*,/,-,+, - 

are used. The symbols are conventional, except for the 
asterisk, which indicates exponentiation. 

The order of precedence for operations is conventional: 

1. | |, [ ] , and ( ) from inside outward 

2. * 

3. • and / from left to right within each term 

4. + and - 

Attention to this order is necessary because we are re- 
stricted to a single line for the expression. The left- to- 
right rule, for example, means that 

x/2-y xs -j- 9 not j- , 
x/2/y is ^, not 27^. 

The order of precedence rule, for example, means that 

a+b -c+d is a+(b-c)+d not (a+b) • (c+d) , nor (a+b) • c+d , 
a-b+c-d is (a-b) + (c-d) not a-(b+c)-d, nor (a-b+c)«d, 



and 

y 



x/y*2 is -^, not {^j , 



x*2/y is — , not x 2/y . 

y — 
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JOSS also handles Boolean expressions composed of 
mathematical statements using the relational operators 

=, *, ^, ^, <> >, 

and the negation 



not, 



and connected in turn by the logical operators 

and , or . 
These will be discussed further in Sec. 2.7. 

1.3. ERROR CORRECTION 



JOSS helps the user to type his commands and expres- 
sions precisely. During the typing of a line, the user 
may backspace and strikeover, or he may use the strikeout 
symbol # to delete a character. To delete an entire line, 
he may begin or end the line with an asterisk. 

If errors are detected in the line as finally pre- 
sented, JOSS will respond with an error message. For 
improperly written direct commands, JOSS will give an im- 
mediate error message; the direct command should be re- 
entered. For indirect commands, however, the only check 
that JOSS makes is for a valid step number. Thus, a deci- 
mal number followed by a space and any string of characters, 
for instance, will be stored as a step. Errors in the 
command itself, if any, are detected only when the command 
is interpreted; in this case, JOSS stops at the point of 
the error, gives a message beginning with " Error at step . . . " , 
and returns control to the user. 
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If an improper formula definition is indicated, the 
definition may be replaced or corrected by reusing the 
identifier. The step itself may be replaced or corrected 
by reusing the step number. JOSS resumes the program at 
the point of error when the £o command is given. 



Chapter 2 
IDENTIFIERS AND DIRECT COMMANDS 

2.1. INTRODUCTION 

Many engineering and other mathematical problems can 
be solved by (1) expressing the required answer in terms 
of formulas, (2) determining the values of the parameters 
involved, and (3) evaluating these formulas for these values. 
To solve such problems with the aid of JOSS, we do (1) and 
(2) by entering formulas and values through the typewriter 
keyboard; JOSS will evaluate and type the answer (3) when 
requested. Missing or misused formulas will be pointed out 
in lieu of an answer. Typing (1) and (2) is similar to 
setting up the problem with pencil and paper. 

All methods of solving problems, other than calcu- 
lating numerical expressions , normally require the defini- 
tion of identifiers as variables, functions, and/or propo- 
sitions. These identifiers are defined and used on JOSS 
according to standard mathematical usage and notation 
except for a few added English words. 

In this chapter we will use only direct commands. 
We will solve problems by using the Type , Set , Let , and 
Delete commands directly. Type or Delete may be used at 
any time to examine or to delete part or all of our input. 

Appendix A presents a list of the allowable forms of 
these four commands and includes rules of form and notes 
that are applicable to the commands. Appendix B describes 
the use of expressions and propositions, and App. C dis- 
cusses the available JOSS functions. The reader should 
make reference to these sections, as he finds necessary, 
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for elaboration of the material presented in the main text. 

2.2. CALCULATION: TYPE COMMAND 

When we enter "Type I I . " , JOSS repeats the expression 
signified by "i i" and types its value: "CZl = (number)". 
The expression is, in fact, a number. 

EXAMPLES 



Type 2. 

2 = 2 

Type _,3*2, 3. 1416.3*2,_,sin(3. 1416/6), 5 •7-11/12/8. 3. 

3*2 = 9 

3.1416«3*2 = 28.2744 

sin(3. 1416/6) = .50000106 

5.7.11/12/8.3 = 12.03125 



Note that expressions separated by commas may be 
listed in one Type command, and that underscores 
may be used to indicate null items for formatting 
JOSS's output. (A void response would result from 
"Type all.", as JOSS has stored no information.) 

2.3. VARIABLES: SET COMMAND 

We define a variable by choosing an identifier (such 



t _ 

The symbol I I is used throughout this memorandum to 

indicate that any mathematical expression reducible to a num- 
ber may be substituted. Actual JOSS input and output will be 
distinguished by a two-color, elite- typeface, indented format, 
The reader with access to a JOSS console may verify JOSS's re- 
sponses by entering these examples as he reads them. 
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as "x") and typing "x = □ " or "Set x = CZI . " 



Set x = 5*10*3. 
y=sqrt(x/3) + 5 
Type all. 



x = 5000 

y = 45.824-8291 



The identifiers x and y are set to the proper numerical 
values and retain these values until redefined. This com- 
mand has two distinct parts joined by an equals sign. The 
expression that appears to the right of the equals sign 
must be reducible to a number. The single letter to the 
left of the equals sign, although it may have been pre- 
viously defined as a number (variable) , is not a number 
in this command , but an identifier about to receive a new 
definition. For example, after defining x above, we may 
type 

x = 2«x+l 

The expression on the right of the equals sign is a num- 
ber, while the x on the left is the identifier being newly 
defined. 

We may find the value of a variable by typing 



Type x. 

x = 10001 



which is the same command as used in Sec. 2.2. 



2.3. VARIABLES 

A lengthy expression may be shortened by using vari- 
ables to represent its parts. 

EXAMPLE 



Evaluate the expression 

(«*S) 



2 + 42 - Jll 
17 



(.♦*i) 



by assigning identifiers to the values of parts of 
the expression. 

Solution: 



a = 6tll/32 
b=[42-sqrt(ll)]/17 
Type (a*2+b)/a. 

(a*2+b)/a = 6.70244836 



We may define frequently used constants, such as pi 
and a conversion factor for changing from degrees to ra- 
dians, by 



p=arg(-l,0) 

k=p/180 



where arg is the JOSS abbreviation for the argument function 
of a rectangular coordinate point. Any of these defined 



t 

The argument function is used here merely as a con- 
venient way of getting a numerical value for the constant tt; 
see App. C for a detailed description of this function. 
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variables, or constants, may now be used to form expres- 
sions. For example: 



x=2 

Type p«x*2, 45-k. 

p«x*2 = 12.5663706 
45«k = .785398163 



The status of our input may be examined by typing 

Type all. 



a = 


6.34375 


b = 


2.27549266 


k = 


.0174532925 


P = 


3.14159265 


x = 


2 


y = 


45.8248291 



2.4. VARIABLES DEFINED BY FORMULAS: LET COMMAND 

We can tell JOSS how to calculate x, rather than fix- 
ing the value of x as in the previous section, by typing 
"Let x = i i. " Before demonstrating this, however, we 
should type "Delete all." to instruct JOSS to erase all 
of our previous inputs. 



Delete all. 

Let d = c/arg(-l,0). 

Type all. 



d: c/arg(-l,0) 

The use of Let indicates that the identifier d is not 
set to the numerical value of the expression on the right, 
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but is defined by the formula . This formula for diameter 
is indeed an expression reducible to a number when all of 
its elements are defined, but its value will be calculated 
only when d is called for*, as when we enter 



c = 10.5 

Type d, arg(-l ,0 ) •d*2/4. 

d = 3.34225381 

arg(-l,0)»d*2/4- = 8.7734-1623 



Although JOSS has not stored a value for d, it calculates 

a value each time d is called for, provided the CZ3 is 
reducible to a number at that time. 

If □ contains a Y that is undefined, for example, 

Let x = Y*2«arg(-1,0). 

we get 



Type x. 

Error in formula x: Y = ??? 



when we attempt to use x. JOSS helps us keep our formulas 
straight. We may check our formula with 



Type formula x. 

x: Y*2«arg(-1,0) 



JOSS's response presents the formula as we defined it. 

Formulas may be broken into parts in much the same 
way used for the example in Sec. 2.3. 
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EXAMPLE 
Solve each of the following equations for x: 



10x 2 + 45x + 29 = 0, 
1.7x 2 + .08x + .95 = 0. 



Solution: 

We write the quadratic formula 



-b + Vb - 4ac 



2a 



in parts by typing 



Delete all. 

Let A = -b/2/a. 

Let B = sqrt(b*2-4«a'c)/2/a. 



then set a, b, c and solve; thus 



a=10 
b=45 




c=29 




Type A+B, A-B. 
A+B = 
A-B = 


-.77945588 
-3.72054412 



We may reset a, b, c and solve the second equation: 



a=1.7 

b=.08 

c=.95 

Type A+B, A-B. 

Error in formula B: I have a negative argument for sqrt. 



2.4. VARIABLES DEFINED BY FORMULAS 



13 



This means that the answer will be A ± Ci, where i is 
the square root of -1 and defining C as 



Let C = sqrt(-b*2+4«a«c)/2/a. 

Type A, C. 

A = -.0235294118 

C = .747174612 



Let us check the present contents of our immediate 
memory: 

Type all. 



A: -b/2/a 

B: sqrt(b*2-4«a«c)/2/a 

C: sqrt(-b*2+4-a«c)/2/a 

a = 1.7 

b = .08 

c = .95 



The fact that a variable may be defined by a formula 
containing variables, which are defined in turn by other 
formulas, simplifies the analysis of physical problems. 
Unknown quantities may be designated by letter identifiers; 
the user may enter these identifiers and formulas in any 
convenient order. 

EXAMPLE 



Find the tensile stress in a wire with radius of r 
supporting a triangular piece of material with sides 
a, b, and c, thickness t, and density d (in inches 
and pounds) . 
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Solution: 

Stress, x, is weight divided by wire cross-sectional 
area: 

Delete all. 
Let x = W/A. 

Wire cross-section: 

Let A = p«r*2. 
p = arg(-l.O). 

Weight is thickness times face area times density: 

Let W = ff'd. 

Area of triangular face of weight: 

Let f = [s«(s-a)»(s-b)«(s-c)]".5. 
Let s = (a+b+c)/2. 

All that remains to be done is to set values for r, 
t , a , b , c , d , and type 



Type x,W,A. 

Error in formula W: t = ??? 



Thus , JOSS will remind us in the event parameters 
have not been defined. 



r=.l 




t=l 




a=15 




b=20 




c=25 




d=490/12*3 




Type x,W,A. 




x = 


1353.92226 


W = 


42.5347223 


A = 


.0314159265 



2.5. FUNCTIONS ^ 



To solve the above example with a change in any of the 
parameters, say, a and b, it is only necessary to type 



a=18 




b=18 




Type x,W,A. 




x = 


1461.31468 


W = 


45.9085546 


A = 


.0314159265 



because all other identifiers retain their definitions, 



Type all. 



A: 


p«r*2 






W: 


t«f«d 






f: 


[s-(s- 


-a)«(s-b)«(s-c)]* 


.5 


s : 


(a+b+c)/2 




x: 


W/A 






a = 




18 




b = 




18 




c = 




25 




d = 




.283564815 




P = 




3.14159265 




r = 




.1 




t = 




1 





2.5. FUNCTIONS: LET COMMAND 

We may assign the identifier x to be a (user-defined) 
function of two arguments by typing "Let x(y,z) = I I. " 



Delete all. 

Let x(y,z) = y*2 + z/2. 



The letters y and z in this example are dummy arguments ; up 
to ten of these may be used in defining a function. Thus, 
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x(a,b) is a + -, 



x(2,4) is 2 + -», 



2 

4 
2 



and so forth, and x has become a function. We may apply 
the newly defined function by furnishing, in this case, 
two arguments: 



Type x(3,7). 

x(3,7) = 12.5 



A user-defined function, together with arguments, is an 
expression (reducible to a number) . The identifier used 
alone is defined as a function and has no numerical value, 
When we try 



Type x. 

x(y,z) : y*2 + z/2 



JOSS does not respond as it did to a "Type I I. " command 
because x, alone, is not an expression. We are saying 
"Type the definition of x." JOSS gives us the definition 
of the function x exactly as we typed it initially. Note 
that the same type of response was obtained in Sec. 2.4 by 



Type formula x. 

x(y,z): y*2 + z/2 



which is also a valid command here. 

The value of the function x(y,z) is not defined at 
this point because y and z have not been defined. 



Type x(y,z). 
y = ??? 
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The use of an identifier as a dummy argument does not de- 
fine it nor affect its previous definition in any way. 

Some useful user-defined functions are log to base 10 : 

Let L(x) = log(x)/log(10). 

and tangent : 

Let T(a) = sin(a)/cos(a) . 

Now let us use the newly defined functions. First we will 
define a radian/degree constant: 

k=arg(-l,0)/180 

It is clear from the defining expressions (to the right of 
the equals signs) that numbers or expressions are to be used 
in place of the dummies x and a. So we type 



Type L(100), T(45-k). 

L(100) = 2 
TC+5«k) = 1 



In the derivative we have a function of a function, 
which is defined (approximately) by 



d f <v> - f (x + S) - f (x) 
dx" tW 6 



or, for JOSS: 

Let D(f,x) = [f(x+.0001) - f(x)]/.0001. 
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In using this function, the dummy f must be replaced by a 
function, and the dummy x replaced by a value for the in- 
dependent variable. We can evaluate (approximately) 



d . 
-r- tan x 
dx 



and -r— sin x 

dx 



30° 



and compare the latter with cos 30° by the command 



Type D(T,0), D(sin,30«k), cos(30«k). 
D(T,0) = 1 
D(sin,30«k) = .866 

cos(30»k) = .866025404 



The integral function may be defined by Simpson's rule, 
which tells us that the area under a curve from a to b is 



Ax 

■y <y + 4 7l + 2, 2 + 4y 3 + 2, ... +y n ), 



where Ax = — = — . 
n 

y - f(a). 
y n =f(b), 



and the general ordinate is 

y.-f[a + i(b-a)]. 
We define this function in JOSS by typing 



Let I(f,a,b) = (b-a)/n/3.[f(a) + f(b) + S(f,a,b)]. 

Let S(f,a,b) = sum[i=l(l)n-l: [3-(-l)*i]»f (ati«[b-a]/n)]. 

n=100 
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where f is the function, and a and b are the lower and 
upper limits. An even number must be used for n. One 
hundred gets good accuracy (around .001 percent, depending 
on the function) . Larger n improves accuracy but takes 
more computation time. Other schemes for numeric integra- 
tion (for example, two-point Gaussian) may be constructed 
in an analogous fashion. 

EXAMPLE 

Using the Simpson's rule integral function defined 
above, we may numerically integrate JOSS functions 
or those that we define: 

10 3 90° 

x dx and f sin x dx. 
J J 

For example: 

Let a(x) - X"3. 
k=arg(-l,0)/180 
Type I(a,0,10), Ksiri, 0,90 k) . 

I(a,0,10) = 2500 

I(sin,0,90«k) = 1 



2.6. INDEXED VARIABLES: SET COMMAND 

A variable may be indexed and defined by setting it 
equal to a number in the same manner as were simple vari- 
ables in Sec. 2.3. Variables defined by formulas (using 
Let ) may not be indexed. 

Each indexed x, for example, is a distinct variable 
and may be assigned values and used in the same way as 
other variables. We may type 
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Delete all. 
x(l) = 9 
x(2) = 13 



and then use these x's as numbers 



Type 2.x(l), x(2)*2. 

2«x(l) = 18 
x(2)*2 = 169 



The nonindexed variable x cannot coexist with the indexed 
variable x. Accordingly, in this case the command 



Type x. 

x(l) = 9 
x(2) = 13 



results in all the defined values of x being typed , just 
as a single value was typed for a variable in Sec. 2.3. 
In Sec. 2.3 we indicated that an identifier may be 
used in only one way at a time and that redefinition de- 
letes any previous definition. In the example above, x 
is being used as an indexed variable with a dimensionality 
of 1. If we now type 

x(l,l) = 25 
x(l) and x(2) are deleted: 



Type x. 

x(l,l) = 25 



An identifier may be indexed with from one to ten subscripts 
with integer values in the range -250 through +250. 
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When we need to set a large number of variables, the 
use of indirect commands (Sec. 3.3) simplifies the procedure, 

Indexed variables are frequently used with the JOSS 
functions sum , prod , max , min , and first . (See App. C.) 

EXAMPLE 

Assume that for a straight member, the weight distribu- 
tion has been defined by n weights, w(i) , and their mo- 
ment arms, x(i) , about some reference point. 



w(l) = 5 
x(l) = -3 
w(2) = 7 
x(2) = 4 
w(3) = 6 
x(3) = 2 
w(4) = 8 
x(4) = -5 
n=4 



Find the total moment M, total weight W, and the 
location C (with respect to the reference point) of 
the center of gravity. 

Solution: 



M = sum(i=l(l)n: w(i)«x(i)). 

W = sum(i=l(l)n: w(i)). 
Type M,W,M/W. 

M = -15 

W = 26 
M/W = -.576923077 



The iterative phrase reads "[sum] over i, from 1, in 
steps of 1, through n." The i (or other letter) used as 
the iteration variable in the arguments of sum , prod , max, 
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min, and first functions is a dummy; that is, the use and 
definition of identifier i outside the bracketed argument 
are not affected. 

2.7. PROPOSITIONS: LET COMMAND 

Propositions are Boolean expressions composed of 
arithmetic statements using the relational operators 

-, *, S *> <> >• 

If there is more than one statement, they are connected 
in turn by the logical operators 

and , or . 

Each proposition has a logical value of true or false. To 
define an identifier as a proposition, we type 



Delete all. 

Let x=2<3 and not 3>4 or (5-3 and 2=2). 



with the defining proposition following the first equals 
sign. To see how JOSS handles propositions, we type 

Type x. 

x = true 
Type formula x. 

x: 2<3 and not 3>4 or (5=3 and 2=2) 



In this text, the term expression used alone (or 
the symbol \ZH ) means a mathematical expression that is 
reducible to a number, and Boolean expressions (proposi- 
tions) are excluded. 
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Expressions may replace the numerical values in the fore- 
going illustration. Also, the arithmetic statements may 
be replaced by identifiers defined as propositions, such as 

Let p = x or y and z. 

Type p. 

Error in formula p: y = ??? 

We have defined x as a true proposition. Let us define y 
and z with 



Let y = true. 
Let z = false. 



JOSS reads the word "true" as a true proposition and "false" 
as a false proposition. Now the command 



Type p. 

p = true 



can be executed. 

The order of precedence of operations within a propo- 
sition is as follows: 

1. evaluation of expressions 

2. ( ) from inside outward 

3. relational operations 

4. not 

5. and 

6. or 

A series of relational operations is an and chain. For 
example, 

a < x = y > b 

is read "a < x and x = y and y > b." 
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The truth value function, tv( ) , takes a proposition 
as its argument. The truth value for a true proposition 
is 1; for a false proposition, it is 0. 

Type tv(x), tv(y) , tv(z), tv(x or y and z). 

tv(x) = 1 

tv(y) = 1 

tv(z) = 
tv(x or y and z) = 1 

Thus, the truth value function may be used as an expres- 
sion since it is reducible to a number. 

Aside from strictly Boolean applications, propositions 
find use in JOSS as conditions for the conditional command 
(see xf_ phrase, Sec. 3.6) and for conditional expressions 
(Sec. 2.8). 

Propositions may be written as functions, with their 
arguments consisting of expressions or propositions. For 
example, we may use the propositions defined above: 



Let P(a,b) = a or b. 
Type P(y,z). 

P(y,z) = true 



or use expressions as arguments 



Let p(a,b) = 


a>b. 


Type p(3,2). 




p(3,2) 


= true 


Type all. 




P(a,b) 


a or b 


p(a,b) 


a>b 


X 


2<3 and not 3>4 or (5=3 and 2=2) 


y 


true 


z 


false 



2.8. CONDITIONAL EXPRESSIONS 
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2.8. CONDITIONAL EXPRESSIONS 

A conditional expression is indicated by a set of 
parentheses (or brackets) containing several expressions 
separated by semicolons, with each expression preceded by 
a proposition and colon: 

(prop: CZH ; prop: CZ) ; LZH) 

The value of the conditional expression is the value of 
the expression EZD that follows the first true proposition, 
reading from left to right. The conditional expression, 
therefore, reduces to a single expression for any given 
condition. The last proposition may be omitted if the 
last expression is to hold for all cases not covered by 
the other propositions. 

EXAMPLES 



1. Define the function shown below: 



y = 



I — 




y = l 



Let f(x) = (x<0: 0; 0<x<l : x*2 ; 1). 
Type f(-3), f(.25), f(.5), f(.75), f(3). 

f<-3) = 

f(.25) = .0625 

f(.5) = .25 

f(.75) = .5625 

f(3) = 1 
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2. Define the factorial function . 

Solution: By definition, if n is a positive in- 
teger, n! is 1 • 2 • 3 ... (n - 1) ■ n; if n is 
0, n.' is 1. 

Let f(n) = (n=0: 1; fp(n)=0: prod(i=l(l)n: I)). 

Type f(0), f(5), f(20). 

f(0) = 1 

f(5) = 120 
f(20) = 2. 432902*10*18 

Type f(3.5). 

Error in formula f: Eh? 

The second proposition guards against inadvertent 
application of the function to a noninteger. 

We may also write a conditional proposition by using 
propositions in place of the expressions. The conditional 
proposition reduces to a single proposition for any given 
condition. 

EXAMPLE 

Define f(x) to be true if x is even, false otherwise. 



Let f(x) = [fp(x/2)=0: true; false]. 
Type f(l), f(2), f(5). 

f(l) = false 

f(2) = true 

f(5) = false 



2.9. SETTING VARIABLES TO BOOLEAN VALUES 

In Sees. 2.3 and 2.6 we have emphasized that the Set 
command assigns a numerical value that the identifier re- 
tains until it is redefined. We will now find that with 
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a similar command we may assign Boolean values (Sec. 2.7) 
that the identifiers retain until redefined. 



Set p(l) = true. 



p(2) = a>b 




a = ??? 




a=sin(3.3) 




b=exp(-2) 




p(2) = a>b 




Type p. 




PCD = 


true 


p(2) = 


false 



Chapter 3 
INDIRECT COMMANDS 

3.1. INTRODUCTION 

By the methods described in Chap. 2, we are able to 
solve a complex problem where only a few answers are re- 
quired. We use indirect commands when many answers are to 
be typed, when many variables are to be set, or when a pro- 
cess is to be done repeatedly or in a particular sequence. 
Section 3.5 describes programs that set variables and orga- 
nize tabular printout of data, using formulas to define the 
problems. Section 3.6 shows how calculations may be de- 
fined and performed by program steps. 

3.2. STEPS AND PARTS; DO AND TO COMMANDS 

We have defined a program as a step or set of steps 
(that is, indirect commands) to be performed in a specified 
order. 

A step is defined by prefixing a command with a mixed 
decimal number, making it an indirect command. A step may 
be replaced or corrected by simply reusing the same step 
number. 

A part is the collection of all steps whose step labels 
have the same integer part. This integer is the part number , 

The Do command initiates a program by telling JOSS to 
do one part or one step. In doing a part, JOSS executes 
each step in turn by order of step number, regardless of 
the order in which the steps were typed. This means that 
a step may be inserted between two other steps at any time 
by using a step number whose value lies between that of the 

28 
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other two steps. Execution of the last step in the part 
named completes the execution of the Do part I I . command. 
To illustrate: 



Delete all. 

1.1 Type "The quick". 

1.2 Type "jumps over". 
2.1 Type "the lazy dog". 
1.15 Type "brown fox". 
Type all. 



1.1 Type "The quick". 
1.15 Type "brown fox". 

1.2 Type "jumps over". 

2.1 Type "the lazy dog". 



-*• 



Note how step 1.15 was inserted in the proper place, 



Do part 1. 
The quick 
brown fox 
jumps over 



When JOSS finished part 1, the direct command was satisfied. 
The part being done may contain Do commands that reach 
out to another step or entire part: 



Delete all. 

2.1 Type "brown". 

2.2 Type "fox". 

2.3 Type "jumps". 

1.1 Type "The quick". 

1.2 Do part 2. 

1.3 Type "over the lazy dog". 
Do part 1. 

The quick 

brown 

fox 

jumps 

over the lazy dog 
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The To command has a different effect. Let us replace 
step 1. 2 with 

1.2 To part 2. 

Do part 1. 

The quick 

brown 

fox 

jumps 

Notice that To causes the part being executed to be dis- 
continued at that point. A transfer is made to another 
part, and when the new part is finished, the direct com- 
mand is satisfied. We may wish to transfer to some step 
other than the first in the new part: 

1.2 To step 2.2. 
Do part 1. 

The quick 
fox 

jumps 

The direct command is satisfied when the remainder of the 
new part is executed. 

3.3. DO ITERATIONS; FOR PHRASE; DEMAND COMMAND 

Do iterations are formed when the Do command contains 
the CZH times phrase or the for phrase. 



Delete all. 

1.1 Type x*2. 

Do part 1 for x = 1(1)4,6. 

x*2 = 1 

x*2 = <+ 

x*2 = 9 

x*2 = 16 

x*2 = 36 

Type x. 
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The for phrase, "for x from 1, in steps of 1 to 4, then 6," 
has caused JOSS to "Do part 1" for each value of x listed. 
In the process, x was actually set to each value listed, 
as evidenced by the response to Type x. Thus , a real iden- 
tifier , not a dummy, is used in the for phrase iteration. 

In Chap. 2 we used formulas to define our problem and 
obtained answers with direct commands for various settings 
of the parameters. We are now prepared to obtain as large 
a table of values as we wish by the use of Do iterations. 

EXAMPLE 

Define A, B, and C in terms of x by means of formulas. 



Let A = X"2 + 5.2-x - 3.5. 
Let B = x*2 - 6.1'x + 4.3. 
Let C = x*2 + 3.3«x + 5.7. 



Suppose we wish to evaluate these expressions for a num- 
ber of values of the independent variable x. We may type 

1.1 Type _,x,A,B,C. 

Do part 1 for x=l(l)5(5)20. 



x = 


1 


A = 


2.7 


B = 


-.8 


C = 


10 


x = 


2 


A = 


10.9 


B = 


-3.9 


C = 


16.3 




x = 


20 


A = 


500.5 


B = 


282.3 


C = 


471.7 
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A Do iteration involving the Demand command is a con- 
venient way to set a number of variables, since JOSS then 
helps with the typing. To input the data for the example 
in Sec. 2.6, we could type (for 5 weights) 



1.1 Demand x(i). 

1.2 Demand w(i). 

Do part 1 for i=l(l)5. 
x(l) = 



(Only one variable may be listed in each Demand step.) The 
Do iteration has begun. JOSS has set i = 1, typed the first 
part of the set x(l) command, and returned control to us for 
typing the value. When we type a value and strike carrier 
return , w(l) will be demanded. The process may be inter- 
rupted at any point by striking carrier return without en- 
tering a value. The Go command resumes the process, which 
is completed when all variables through w(5) are set. 



x(l) = 3 
w(l) = 5 
x(2) = 3.654 
w(2) = z*2 

z = ??? 

w(2) = 

I'm at step 1.2. 

z=23.5 

Go. 

w(2) = z*2 
x(3) = z/7 
w(3) = 5 
x(4) = 3»z+4 
w(4) = 5.331 
x(5) = 7/3.551 
w(5) = 6 



If we desire to see a printout of all the x(i) and 
w(i) that have been set , we may type "Type all." (JOSS 
will type steps and values), "Type all values.", or 
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Type 


x, ,w. 








x(l) 


= 


3 




x(2) 


= 


3.65"+ 




x(3) 


= 


3.35714286 




x(4) 


= 


7i+. 5 




x(5) 


~ 


1.9712757 




w(l) 


— 


5 




w(2) 


= 


552.25 




w(3) 


= 


5 




w(4) 


= 


5.331 




w(5) 


= 


6 



Since i is a real variable that has actually been set to 
the values in the iteration phrase, it now has the value 5. 

Type i, x(i), w(i). 

i = 5 

x(i) = 1.9712757 

w(i) = 6 

Do iterations using the CZ] times phrase find use in 
approximations requiring a repetitive process (see the last 
example on p. 39; note the comma between the step or part 
number and the (ZZ3 times phrase) . 

3.4. FORMS AND FIELDS 

The first printout on p. 31 gives one value per line, 
occupies considerable space, and is relatively slow. To 
improve the situation, define a form with fields . Forms 
are entered on two lines, the first of which must be "Form 
1 1 :". The colon reminds us that the next full line is 
committed to the form definition. For example, 

Form 1: 



allows JOSS to type the four values on one line. The 
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form number must be an integer, followed by a colon; the 
form definition is typed on the next line. The formulas 
for A, B, and C are still in our immediate memory; before 
we use them again, we should delete the program steps no 
longer needed. 

Delete all steps. 

1.1 Type x, A, B, C in form 1. 

Do step 1.1 for x=l(l)5(5) 20. 

1.0 2.7 -.8 10.0 

2.0 10.9 -3.9 16.3 

3.0 21.1 -5.0 24.6 

4.0 33.3 -4.1 34.9 

5.0 47.5 -1.2 47.2 

10.0 148.5 43.3 138.7 

15.0 299.5 137.8 280.2 

20.0 500.5 282.3 471.7 

The fields in the example have three places before and 
one place after the decimal point, so they will accept 
numbers less than 999.95. Significant figures less than 
. 1 will be lost. 

Fields for a tabular form of scientific notation may 
be indicated by strings of periods. 

Form 1 : 



They are thus more convenient to use if the approximate 
size of the answers cannot be predicted. Compare the pre- 
vious output with the following: 

Do step 1.1 for x=l(l)5(5)20. 



1.0 


2.700 00 


-8.000-01 


1.000 01 


2.0 


1.090 01 


-3.900 00 


1.630 01 


3.0 


2.110 01 


-5.000 00 


2.460 0*1 


4.0 


3.330 01 


-4.100 00 


3.490 01 


5.0 


4.750 01 


-1.200 00 


4.720 01 


10.0 


1.485 02 


4.330 01 


1.387 02 * 


15.0 


2.995 02 


1.378 02 


2.802 02 


20.0 


5.005 02 


2.823 02 


4.717 02 
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The last three characters in each field represent the ex- 
ponent part. The number of significant figures is 5 less 
than the number of periods in the field. 

Sometimes it is desirable to include text with the 
typed numbers , such as 



Form 2: 

When x is . , then A is and B is 



When using a form to format the data output, the Type 
command must list no more values than there are fields in 
the form; an underscore may be used to indicate that a 
field is to be left blank. 

x=7.253 

Type x,A,B in form 2. 

When x is 7.253, then A is 8.682 01 and B is 1.266 01 

Type x,A in form 2. 

When x is 7.253, then A is 8.682 01 and B is 

Type x, _, B in form 2. 

When x is 7.253, then A is and B is 1.266 01 

We may also use a form without field indication for a 
heading, such as 



Form 3: 

Elevation Angle Distance Height 

Type form 3. 

Elevation Angle Distance Height 



3.5. PROGRAMMED PRINTOUT 

We will now deal with the use of programs to control 
the setting of independent variables and to obtain certain 
arrangements of data printout. Calculations will be de- 
fined by expressions and formulas as they were in Chap. 2. 

We have seen that the Do part command results in the 
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execution, in numerical sequence, of each step of an entire 
part. A Do step command causes the single step to be done. 
A To step command (if executed while doing a part) causes 
the current part to be discontinued, and the new part to 
be done starting with the step named. The for phrase is 
used only with Do commands, and a Do iteration is formed 
if it includes an iteration expression. 

The actions to be accomplished, such as demanding 
variables, typing a heading, and typing a block of data, 
can be made to occur in the desired order by the proper 
arrangement of program steps. 

Indirect commands should be used for operations that 
must be done repetitively or in a specified sequence. 

The defining of a formula, function, or proposition 
is required only once, and its timing is not critical. The 
Let command therefore should usually be given directly. 

EXAMPLES 

1. There may be a requirement to perform the same 
operation repeatedly on many data. A program 
such as the following might be used: 

1.1 Demand a. 

1.2 Demand b. 

1.3 Type a«b, a/b, b/a in form 1. 
Form 1 : 

a«b = , a/b = b/a = 

1.4 To part 1. 
Do part 1. 

a = 3.5 

b = arg(l,l) 
a«b = 2.74-9 00, a/ b = 4.456 00, b/a = 2.244-01 

a = 3.7 

b = b 
a«b = 2.906 00, a/b = 4.711 00, b/a = 2.123-01 

a = 
I'm at step 1.1. 
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JOSS continues demanding values for a and b, as 
before, until the program is interrupted by strik- 
ing carrier return without entering data. 
2. This program gives a family of curves. The com- 
putation is by formula. 



Delete all. 

Let x - a< : 2«sin(b/a+5). 

1.1 Type _,a. 

1.2 Type " b x". 

1.3 Do part 2 for b=l(l)4. 
2.1 Type b,x in form 1. 
Form 1: 



Do part 1 for a=10(l)13. 

a = 10 
b x 

1 -9.2581 01 

2 -8.8345 01 

3 -8.3227 01 

4 -7.7276 01 




3.6. PROGKAMMED CALCULATION; IF PHRASE 

Until now we have done all computation simply by de- 
fining our problems in terms of formulas and functions , 
and have used programming as a means of obtaining the de- 
sired order of printout. In some instances, it is neces- 
sary or advantageous to fix the required order of calcula- 
tions by means of a program. 

The if phrase is frequently used in this type of pro- 
gram. Any command may become conditional by the addition 
of the if_ phrase. JOSS ignores the command unless the i_f 
phrase is satisfied. 
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EXAMPLES 



We can find the prime numbers between 100 and 200 
by dividing each number by 2, 3, 5, 7, etc., up 
to the square root of the number, and checking 
for integral quotients. 



Delete all. 

1.1 Do part 2 for w = 2 ,3(2)ip[sqrt(i)] . 

1.2 Type i in form 1 if i*0. 
2.1 Set i=0 if fp(i/w) = 0. 
Form 1: 




2. The following program finds the approximate real 
roots of an equation by Newton's method: 



Delete all. 

1.1 Set x = x - f(x)/d. 

1.2 To part 1 if |f(x)/d|>e. 

1.3 Type x, f(x), d in form 1. 
Form 1 : 



e=10*(-7) 

Let d = [f(x+.00001)-f(x)]/. 00001, 



For example, to solve the equation 



3 2 
x - 4x log x « 0, 



we first explore the shape of the function: 
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Let f(x) = x*3 - 4-x*2«log(x). 
Do step 1.3 for x=l(l)10. 



1.00000000 


00 


1.00 


00 


-1.00 


00 


2.00000000 


00 


-3.09 


00 


-7.09 


00 


3.00000000 


00 


-1.26 


01 


-1.14 


01 


4.00000000 


00 


-2.47 


01 


-1.24 


01 


5.00000000 


00 


-3.59 


01 


-9.40 


00 


6.00000000 


00 


-4.20 


01 


-2.00 


00 


7.00000000 


00 


-3.84 


01 


1.00 


01 


8.00000000 


00 


-2.03 


01 


2.69 


01 


9.00000000 


00 


1.71 


01 


4.88 


01 


1.00000000 


01 


7.90 


01 


7.58 


01 



The columns are x, f (x) , and d, since this is 
their order in step 1.3. By exploring the func- 
tion in this way, we have found two zero crossings. 
We may refine these two approximate roots by 

Do part 1 for x = 1,8. 
1.42961186 00 -1.30-07 -3.68 00 

8.61316937 00 -1.00-06 3.96 01 

These are good approximations as evidenced by the 
small values for f (x) . They may be checked by 

Do part 1, 3 times. 

8.61316940 00 -2.00-06 3.96 01 

8.61316945 00 1.00-06 3.97 01 

8.61316942 00 -2.00-06 3.98 01 

This is a manually directed program. Unless we 
know the general shape of our function, we may step 
over some roots during our original exploration. 
Also, for some functions, the value of e must be 
made larger in order to ensure convergence. 

3.7. SEQUENCING PROGRAM STEPS; STOP, DONE, AND QUIT COMMANDS 

There are four other useful programming devices that 
bear mentioning at this time. A conditional expression for 
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the step number could be used in step 1.2 of the preceding 
example to provide a printout for the condition d = be- 
fore we get the error message for a zero divisor in step 1.1. 

1.2 To step [d=0: 3; |f(x)/d|>e: 1.1; 1.3], 

1.3 Do part 2,3 times. 

2.1 Type x, f(x), d in form 1. 

2.2 Set x = x-f(x)/d. 

3 Type d, x, f(x). 



Do part 1. 






8.61316947 00 





3.98 01 


8.61316947 00 





3.98 01 


8.61316947 00 





3.98 01 



Here we have specified three alternate program sequences 
in a single step. The 3 times printout used manually in 
the previous example has been written into step 1.3. 

The other three devices to be noted are Stop , Done , 
and Quit . The indirect Stop command may be placed at any 
point in the program sequence, and JOSS will return control 
to us at that point. We may take a look at conditions, make 
changes as desired, and then resume the program with Go . 

The Done command allows us to omit the remaining steps 
of a part. Done is usually given conditionally, except 
when added temporarily for part-program operation. 

The Quit command, like Done , omits the remaining steps 
within the same part. In addition, Quit satisfies the com- 
mand to Do that part, stopping any further iteration. 

EXAMPLES 

1. This program will give the solution to n simul- 
taneous equations of the form 
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11 1 12 2 In n 1 

21 1 22 2 2n n 2 



a ,x. 4- a x„ + ... + a x = c 
nl 1 n2 2 nn n n 



if S is set to 1. It will perform the inversion 
of the n x n matrix a. . and stop if S is not 1. 
The program will demand the necessary inputs; it 
types either x. or a... 

Delete all. 

1.1 Demand n. 

1.2 Demand S. 

1.3 Do part 2 for i=l(l)n. 
1.4- Do part 4 for k=l(l)n. 

1.5 To step 9.1 if S*l. 

1.6 Do part 8 for i=l(l)n. 

1.7 Type x. 

2.1 Do part 3 for j=l(l)n. 

2.2 Demand c(i) if S=l. 

3.1 Demand a(i,j ) . 

4.1 Do part 5 for j=l(l)n. 

4.2 Set a(k,k) = l/a(k,k). 

4.3 Do part 6 for i=l(l)n. 

5.1 Set a(k,j) = a(k, j)/a(k,k) if j*k. 

6.1 Done if i=k. 

6.2 Do part 7 for j=l(l)n. 

6.3 Set a(i,k) = -a(i ,k) «a(k,k) . 

7.1 Set a(i,j) = a(i,j >-a(i,k)»a(k,j ) if j*k. 
8.1 Set x(i) = sura(j = l(l)n:a(i,j)*c( j)). 
9.1 Type a. 
This program may be initiated by "Do part 1." 
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An inverted square matrix may be checked by adding 
the step 

10 To step 1.4. 

and initiating reinversion of the matrix by "Do 
part 10." 
2. Let us use the Done command in a program to find 
the prime numbers less than 100 (see Example 1, 
Sec. 3. 6) : 



Delete all. 

1.1 Done if fp(n/2) = and n*2. 

1.2 Done if fp(n/3) = and n*3. 

1.3 Done if fp(n/5) = and n*5. 

1.4 Done if fp(n/7) = and n*7 . 

1.5 Type n in form 1. 
Form 1 : 



Initiate the program with "Do part 1 for n = 1(1)100." 
The Type command is reached only if none of the Done 
conditions is satisfied. 



Chapter 4 
TECHNIQUES 



4.1. INTRODUCTION 



The JOSS language and software are constructed so that 
programs may be evolved through trial and error. The ma- 
chine cannot be hurt or the program "hung up" by combina- 
tions of invalid or illegal commands at the console. All 
that is necessary to solve most problems is a knowledge of 
the problem, a list of JOSS commands and functions (see 
Apps. A and C) , and patience. 

There are many alternate ways of writing a correct 
program, however, and this chapter aims at helping us with 
a few of the choices. Error message explanations are also 
given to help shorten the trial-and-error process of pro- 
gram debugging. 

4.2. DIRECT VERSUS INDIRECT COMMANDS 

Many commands may be given either directly or indi- 
rectly. The choice is simple if we remember the general 
rule: Use direct commands unless the operation is to be 
done repetitively or in some specified sequence. 

Let is used to define formulas , functions , and propo- 
sitions. Although it is possible to give the Let command 
indirectly, the better practice is to give this command 
directly. Generally, it is necessary to make these defini- 
tions only once during the course of a problem, and timing 
is not critical. 

Consider some of the difficulties encountered with an 
indirect Let command. 
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Suppose that we enter 

1.4 Let x = a/b. 

as a step in our program, and JOSS later tells us that 
there is an 

Error at step 4.3 (in formula x) : b = ??? 

because we should have written x = a/c. We may attempt to 
correct the trouble with 



1.4 Let x = a/c. 
Go. 



But JOSS will still respond 

Error at step 4.3 (in formula x) : b = ??? 

because x is still defined as a/b until step 1.4 is executed 
again. 

Another possible mistake is to correct the formula 
directly: 

Let x = a/c. 
Go. 

without correcting step 1.4, in which case formula x will 
be correct until it is redefined incorrectly by the execu- 
tion of step 1.4. 

Finally, it may be that the formula x is defined cor- 
rectly but at too late a point in the program. In this 
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case we might get, for example, 

Error at step 1.1: x = ??? 

because step 1.4 has not yet defined x. This is one rea- 
son for the general rule that Let should be used directly. 

4.3. SET VERSUS LET 

The Let command must be used when we need a function. 
However, we may choose between Set and Let when defining 
a variable. 

The command 



Let x = 



allows x to follow the value of the formula as its inde- 
pendent variables change. This frees us from having to 
reset x repeatedly. Program sequence can be disregarded 
in the definition of x. However, the commands "x = CZI . " , 
"1.1 Set x = CZI.", and "1.1 Demand x(i)." also have their 
advantages. 

Set is more efficient than Let if the value is to be 
used repeatedly at each setting. (JOSS must recalculate 
a variable-defined-by- formula each time its value is used.) 
Set allows us to retain a value while independent variables 
change, as may be necessary in some programmed calculations. 
Set variables may be indexed. 

The Demand command, under control of a Do command with 
a for phrase, is a good way to enter a long sequence of 
values under program control. 
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4.4. DEGREES VERSUS RADIANS 

It is good practice to let all identifiers of angles 
be defined in terms of radian measure. This eliminates the 
need for conversion factors within formulas and reduces the 
possibility of programming error. Any necessary conversion 
should be made at the time of inputting and/or outputting 
data. 

4.5. MINIMIZING FUNCTION ARGUMENTS 

Considerations of space and convenience make it wise 
to use no more dummies in the definition of a function 
than are needed, particularly in expressions containing 
many function symbols. Consider the following examples: 

EXAMPLES 

1. In Sec. 2.5 we could have defined the derivative 
function as follows: 

Delete all. 

Let D(f,x,d) = [f(x+d)-f(x)]/d. 

and its use would have required 



Let T(x) = sin(x)/cos(x). 
Type D(T,0,. 00001). 
D(T,0 t . 00001) = 1 



or 



d=. 00001 

Type D(T,0,d). 

D(T,0,d) = 1 
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2. But, since d will remain .00001, we omit it from 
the list of dummies in the argument of the func- 
tion D, and type 



Let D(f,x) = [f(x+d) - f(x)]/d. 
d=. 00001 
Type D(T,0). 

D(T,0) = 1 



3. Suppose our intended use of D is to set x to some 
value and examine (or use) the derivatives of 
several functions of x at that value. We could 
use D(f ,x) , as in Example 2, and type 



x=0 

Type D(T,x), D(sin,x), D(cos,x). 

D(T,x) = 1 

D(sin,x) = 1 

D(cos,x) = 



but, since x is actually a defined variable, we 
may redefine the derivative function using one 
less dummy: 



Let D(f) = [f(x+d)-f(x)]/d. 

Type D(T), D(sin), D(cos). 
D(T) = 1 
D(sin) = 1 
D(cos) = 



Suppose also that only one function, say, the 
tangent, needs differentiation in our problem, 
but we need symbols for the derivative of tan(x) 
at any value of x. We could define f as a tan- 
gent function and then let D be a function of 
x (only) by typing 
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Let f(x) = sin(x)/cos(x). 
Let D(x) = [f(x+d)-f(x)]/d. 

d=. 00001 
k=arg(-l>0)/180 

Type D(0), D<15»k), D(30»k), D(45«k), D(60»k), 
D(0) = 1 
D(15»k) = 1.0718 
D(30»k) = 1.3334 
D(45«k) = 2 
D(60»k) = H 



5. If x and f will always be defined, D need only be 
a variable defined by the formula: 



Let D = [f(x+d)-f(x)]/d. 

d=. 00001 

Let f(x) = sin(x)/cos(x). 

x=0 

Type D. 

D = 1 



4.6. DRESSING UP THE OUTPUT 

There are two ways to direct JOSS to print headings 
with output: (1) using forms and a 



2.2 Type form 
command , and (2) using the 



2.2 Type "... our heading". 

command. In either case JOSS repeats, stroke for stroke, 
the form definition or the material between the quotes. 

To speed up the data printout, the tabulator can be 
used in the definition of the form for data. If we desire, 
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we may reset the mechanical tabs on the typewriter after 
the form has been defined. The same tabs may also be used 
in the definition of the heading. Backspacing during the 
definition of the heading will cancel spaces and tabs in 
reverse order. 

The Line command is used to separate blocks of data. 



1.71 Line. 

1. 72 Line. 

1. 73 Line. 



Also, a blank line is given for each underscore in a Type 
command , such as 

1.7 Type _,_,_. 

We use a Page command in order to avoid dividing a 
block of data between two pages. For example, if the data 
block and heading together comprise ten lines, we would 
enter 

6.25 Page if $>44. 

just before the step that types the heading. The $ symbol 
carries the current line number. JOSS pages automatically 
after line 54. 

Condensing the printout to get as many figures as 
possible on a page is a useful technique when we are pro- 
ducing extensive data. One way of accomplishing this is 
to present output in tabular form. As an example, let us 
use the cylindrical volume formulas. 
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Delete all. 
Let v = h»A. 
Let A = p»r*2. 
p=arg(-l,0) 

1.1 Type r,v in form 1. 

2.1 Type _,h. 

2.2 Type "Radius Volume". 

2.3 Do part 1 for r=l(l)10. 

Form 1: 



Do part 2 for h = 1,2,3. 





h = 


Radius 


Volume 


1 


3.1 


2 


12.6 


3 


28.3 


4 


50.3 


5 


78.5 


6 


113.1 


7 


153.9 


8 


201.1 


9 


254.5 


10 


314.2 




h = 


Radius 


Volume 


1 


6.3 


2 


25.1 


3 


56.5 


4 


100.5 


5 


157.1 


6 


226.2 


7 


307.9 


8 


402.1 


9 


508.9 



Part 2 gives one table of data. This program results in 
one table for each value of h, with about four tables per 
page. 

A condensed printout may be achieved by redefining 
the volume v as a function of r. Then, area A must be 
defined as a function of r. 
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Delete all. 



Let A(r) = p«r*2. 
Let v(r) = h«A(r). 

p=arg(-l,0) 

1.1 Line. 

1.2 Type "Ht. Radius — >". 

1.3 Type __,1,2,3,4,5,6,7,8,9,10 in form 1. 

1.4 Line. 

1.5 Do part 2 for h = 1,2,3. 

2.1 Type h,v( 1) ,v(2) ,v( 3) ,v(4) ,v(5) ,v(6) ,v(7) ,v(8) ,v(9) ,v(10) in form 1. 
Form 1: 



Do part 1. 

Ht. Radius — >> 

1.0 2.0 3.0 4.0 5.0 6.0 7.0 8.0 9.0 10.0 

1 3.1 12.6 28.3 50.3 78.5 113.1 153.9 201.1 254.5 314.2 

2 6.3 25.1 56.5 100.5 157.1 226.2 307.9 402.1 508.9 628.3 

3 9.4 37.7 84.8 150.8 235.6 339.3 461.8 603.2 763.4 942.5 



Part 2 gives one line of data. Step 1.3 is a heading and 
uses a null value, _, in the first field because no column 
heading is required. 



4.7. DEBUGGING; ERROR MESSAGES 



The salient feature of JOSS is the manner in which it 
works with us to make corrections during the inputting and 
execution of our program. When JOSS gives an error message, 
we may restate our command in the proper form, as we do, 
for example, in conversation when the other person fails 
to understand our comment. 

We also use the Type command to question JOSS when 
the reason for the error message is not understood. We 
can use "Type all steps.", "Type all formulas.", "Type all 
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values.", etc., or even "Type all." when the amount of 
revision makes it difficult to see the current status of 
our program. 

If the error message contains a step number, we may 
use the Go command after making the needed correction. 

EXAMPLES 

The following examples present common indications of 
errors, with possible causes listed below each example 
to aid in pinpointing and correcting errors. 
1. "Eh?" means that the previous line is incorrect- 
ly written. 

a. If the line is an indirect command , the step 
number has been improperly written (for ex- 
ample, not followed by a space). 

b. If the line is a direct Let command, the Let 
x= portion is improperly written- -the space 
omitted, or the command doesn't end with a 
period. 

c. The command may not be legitimate or may be 
incorrectly written. (See App. A.) 

d. Some expressions may be incorrectly written. 
(See App. B.) 

e. We should immediately retype the command with 
any change that seems plausible if we cannot 
find rules that apply. When the expression is 
long, time may be saved by constructing short 
examples to check our notation. For example: 

Type [2+5)/3. 
Eh? 
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implies that brackets and parentheses must 
be used in matching pairs. 

Type 2, if 1=1. 

Eh? 

Type 2 if 1=1. 

2 = 2 

tells us not to use a comma before the if 
phrase, 
f. Transmission line noise can occasionally 

cause an error in transmission. If we feel 
that the line has been correctly written, we 
may check for a transmission error by re- 
typing the line as is. 

2. " Error at step 3.1: Eh? " means that the step 
number is correctly written, but that the command 
is improperly stated. Use the Go command after 
attending to this error. 

a. To see how this step was last defined, type 

Type step 3.1. 

JOSS will type step 3.1 as received. 

b. If step 3.1 is a Let command, the Let x= 
portion is written wrong, or the period is 
omitted. 

c. Check for errors (steps l.c, l.d, l.e). 

3. "Error in formula A: Eh?", following a direct 



Simultaneous space bar/shift key before carrier re- 
turn makes JOSS repeat the line as received, plus ## for 
the illegal space/shift. 



54 4. TECHNIQUES 

command in which A is used, usually means that 
the form of the expression for A is in error, 
a. To see how A was last defined, type 



Type formula A. 

A: CZD 



b. Check for errors (steps l.c, l.d). 

c. The possibility exists that formula A is , in 
fact, correctly written, but that the defini- 
tion of one or more identifiers is not con- 
sistent with its use in formula A. 

4. " Error at step 3.1 (in formula A): Eh? " is cor- 
rected as in Example 3. Use the Go command after 
attending to this error. 

5. " Error at step 3.1: I can't find the required 
step. " or " . . . required part. " is given when 
step 3.1 refers to a nonexistent step or part. 
Use Go after attending to this error. 

a. Examine step 3.1 with 



Type step 3.1. 
3.1 To step 7.2. 



b. If 7.2 is the required step, it has been 

omitted, deleted, or its step number incor- 
rectly written. Investigate with 



Type part 7. 

7. 2 Line. 

7.1 Type " x y". 

7.3 Do part 8 for x - 1(1)10. 
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" Error at step 6.3: I can't express value in 
your form. " or " . . . I have too many values for 
the form. " Use Go after attending to this error. 

a. Have JOSS type the step and type the form. 

b. Check the fields of the form (Sec. 3.2). Do 
not use hyphens for underscores. Use periods, 
not center dot, for decimals and for fields 
for scientific notation. 

c. For " ... I can't express value ... ", type 
the values without a form to find out which 
ones are too large. Remember that JOSS round s 
numbers as required to match the field size, 
and may, for example, round 9.99 ... to 
10.00.... Check that a position has been 
provided for a minus sign if required. 



Type x,y. 

x = (number) 
y = (number) 



d. Use scientific notation fields if necessary. 

7. No printout . Check program order to see why Type 
command is not reached. 

8. Printout not as expected. 

a. Use interrupt to stop needless printout. 

b. Check program order, Do iterations, and Type 
commands (Sec. 3.3). 

9. Obviously-incorrect answers may be due to faulty 
problem analysis and/or setup, or to a number of 
JOSS inputting errors, including disagreement be- 
tween: typed formulas and problem analysis, typed 
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variables and intended data input, program steps 
and desired operations, or the Type statement and 
intended quantities for printout. 

a. Ask JOSS to type the Type statement. Check 
it against the problem setup to see if it 
gives the quantities wanted. 

b. Call for formulas with 

Type all formulas. 

Check expressions for violation of order of 
precedence (App. B) . In case of doubt, short 
examples may be tried. For example: 

Type (2/3)*2, 2/(3*2), 2/3*2. 

(2/3)*2 = .14.44444445 

2/(3*2) = .222222222 

2/3*2 = .222222222 



verifies that the exponentiation is performed 

before the division. 

Have JOSS type intermediate answers , or parts 

of longer expressions, to isolate the source 

of error. 
'I'm at step 1.1. I ran out of space. " or "Re- 
voked. I ran out of space. " means that the user's 
immediate memory is filled. 

a. Check for endless loops via Do or use of Do 
instead of To . 

b. Check for unlimited recursive definition. 

c. Check for x defined in terms of y, and y in 
terms of x. 



10. 



tf T »■ 
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d. The program may be just too large for the 
immediate memory to handle. "Type size." 
may be given to determine how many of the 
available cells of immediate memory have 
been used. The file (Chap. 5) might pos- 
sibly be used to partition the program and 
do a part at a time. 
11. " I have an overflow. " means that some number has 

exceeded 9.99999999-10*99 in magnitude. 

4.8. MORE DEBUGGING TOOLS; CANCEL; PARENTHETIC DO 

Other time-saving devices that may be used during 
program construction or debugging are interrupt ; Cancel , 
Done , Stop , and parenthetic Do; and flow tracers. 

When a process is stopped by an error message or in- 
terrupt , we may use direct commands for tests and altera- 
tions as in the preceding examples and then resume the 
process with the £o command. If we do not wish to resume 
the process, it will be automatically canceled when a 
direct Do command initiates another part or step. However, 
the Cancel command may be used at any time to cancel a 
stopped process and release some immediate memory. 

A suggestion was made in Example 1 that simple direct 
commands may be constructed to test for proper notation, 
without disturbing a stopped program or calculation. We 
may also, at such a time, wish to Do a special trial part 
or an existing part as a test. Since this action would 
normally cancel the interrupted program, a special paren- 
thetic Do is provided. In the following example, use 
interrupt when JOSS enters an endless loop. 
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Delete all. 

1.1 To step 1.1. 

Do part 1. 

I'm at step 1.1. 

2.1 Type x. 

(Do part 2.) 

Error at step 2.1: x = ??? 

x=2 

Go. 

x = 2 
Done. I'm ready to go at step 1.1, 
Go. 
I'm at step 1.1. 



Parenthetic Cancel cancels the current subexecution. The 
parenthetic Do process may be carried out indefinitely 
subject to storage limits. 

The Done , Stop , or Quit commands may be temporarily 
inserted for partial program operation during debugging. 

Use interrupt to stop any unprofitable process. 

Tracers may be placed in a multipart program if we 
desire to determine what parts JOSS is performing between 
printouts. This is done by means of such commands as 



1 Type "Start part 1.". 

2 Type "Start part 2.". 
7.99999999 Type "End part 



:t 7.". 
JOSS will then indicate when it begins or ends a part. 



Chapter 5 
FILING 

5.1. INTRODUCTION 

The immediate memory allotted to our console is cleared 
by "Delete all." when we wish to begin a new problem, or 
by operation of the on/off switch when we turn the console 
over to another user. We may have JOSS "Type all." to get 
a copy of our program before clearing the memory. We will 
also want to file the program, for immediate recall with- 
out the necessity of retyping, if we expect to use the same 
basic program in the near future. This chapter explains 
the JOSS file system and its manner of use. 

5.2. THE FILE SYSTEM 



A centrally located magnetic disc unit provides large- 
volume storage into which information in the immediate mem- 
ory may be filed. Users are assigned files , each of which 
is referenced by the file number followed by a preassigned 
5-character code, enclosed in parentheses. 

Each file provides space for 25 items of nominal size. 
An item may consist of combinations of steps, parts, forms, 
formulas, and values. The available space in a file may be 
fully occupied by fewer than 25 items if some of the items 
are large. A completely filled immediate memory corre- 
sponds to about one- third of a file. 

The user assigns a number to each itejn at the time it 
is filed. The number may be followed by a code of from 1 
to 5 characters in parentheses. Both number and code (if 
any) must be used when recalling the information. 
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5.3. THE FILE COMMANDS 

The five commands, Use , File , Recall , Discard , and 
Type item- list, accomplish all the necessary file actions. 
Fictitious file and item codes will be used in our examples. 
The command 



Use file 123 (abcde) . 
Roger. 



makes our file available for use. The acknowledgment " Roger. " 
indicates that henceforth all item references will be to 
items in this file until another Use command is given or 
the console on/off switch is operated. If file 123 (abcde) 
had not existed, JOSS would have responded with an error 
message: " I can't find the required file." (In this ex- 
ample, note the mandatory space required between the file 
number and the code.) 

We may now file all or part of the information in our 
immediate memory with a command such as 



File all as item 5 (jones) 
Done. 



As a result, both file memory and immediate memory contain 
the information. (If we try to file an item before we have 
opened a file, we get the error message " You haven't told 
me what file to use. ") We may wish to file only all val- 
ues , all formulas , part 1 , etc. (see App. A). (If item 5 
had already been occupied, an error message would have 
been given: " Please discard the item or use a new item 
number. ") 
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To recall the same item at a later time, we must be 
using file 123 (abcde) when we type 



Delete all. 

Recall item 5 (jones) 

Done. 



Once again, the item is present in both our immediate mem- 
ory and the file. (If item 5 (jones) had not existed, JOSS 
would have responded with an error message: " I can't find 
the required item." ) Recall is the only file command that 
causes a change in our immediate memory. The effect is 
the same as if we had retyped the item. Existing steps, 
forms, and identifiers will remain as is, except where re- 
defined by the recalled item. 

When we no longer need the item, we may discard it 
while using file 123 (abcde) by typing 



Discard item 5 (jones) 
Done. 



and the item 5 space is cleared. The immediate memory is 
unchanged by the Discard command. 

5.4. USING THE FILE 

We may want to file information for several reasons: 

• We expect to solve similar problems using the same 
basic program or the same data. 

• We need time to evaluate the results of a first 
trial before deciding how to modify the program 
and proceeding further. 
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• The problem is of such length that more than one 
sitting is necessary to compose a program. 

• We want to try a modification of a part, with the 
option of restoring the current setup. 

• We want to keep general processes as subroutines. 

• We have not finished our session by the scheduled 
recess hour. 

An index is necessary if we are to know where we may 
file as well as where to find the required items. JOSS pro- 
vides a basic index to the contents of a file in response 
to the command 



Type item-list. 

ITEM CODE RPN DATE SPACE 

5 JONES 1407 12/23/66 3 

7 1 1/02/67 1 

25 INDEX 1407 1/02/67 1 



For each item in the file, JOSS will type the item number, 
item code (if any), date of filing, project number, and 
space occupied by that item. (The total space available 
in a file is 100.) Since this is often insufficient in- 
formation to identify the file items precisely, the user 
is strongly urged to maintain an additional index to his 
file in an otherwise unused item. 

When modifying an item, the original version should 
not be discarded until the new version has been filed and 
verified. 

We may wish to recall parts of a program, such as 
formulas or values, without upsetting existing program 
steps in our console. This may be done by separate filing, 
but other arrangements are also possible. If, for example, 
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we wanted the values from item 1 to replace the values in 
our existing program, we could 



File all as item 20. 

Done. 

Delete all values. 

File all as item 21, 

Done. 



which files our existing program both with and without 
values. To file the values from item 1 separately, we 



Delete all. 

Recall item 1. 

Done. 

File all values as item 22. 

Done. 
Delete all. 



At this point we have filed 

• The existing program as item 20 , and 

• The existing program without values as item 21 , and 

• The values from item 1 as item 22 . 

This example, which presents only one of several ways 
to replace values, is primarily intended to indicate how 
information may be sifted and sorted. Items without a 
future use should be discarded as soon as they are no 
longer needed. 



Appendix A 
JOSS COMMANDS 

A.l. SOME RULES OF FORM 

A command to JOSS takes the form of an imperative En- 
glish sentence, obeying the standard rules for spelling, 
capitalization, punctuation, and spacing. "Eh?" indicates 
that one or more of the following rules has been violated. 

• Limit commands to those listed. 

• Capitalize the first word only. 

• Insert a period at the end of each command. 

• Use commas to separate items in a list. 

• Space before and after each English word and be- 
fore the first bracket of a file or item code. No 
space is allowed within a word or number, nor be- 
fore the first bracket of a subscript or function 
argument. Spaces are optional elsewhere. 

• Follow the rules for expressions given in App. B. 

A. 2. NOTES APPLICABLE TO THE COMMANDS 

Commands are represented in general form in this ap- 
pendix. The following notes apply: 

• Single- letter identifiers may be used in place of 
f, x, and y. 

• Indexed variables may be used in place of x and y. 

• Single- letter dummies only may be used in place of 
a, b, and c in function definitions. 

• I — I indicates that an expression may be used (App. B) 

• The ±f phrase may follow any command. The command 
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will be ignored unless the if phrase is satisfied. 

• Expressions for part and form numbers (and the in- 
dex of an indexed variable) must equate to integers. 

• Strikeover with # deletes a character. 

• JOSS ignores lines (other than the body of a form) 
begun or ended with *. 

• $ is a single character which always carries the 
value of the current line number. 

• (D° commands) and (Cancel ) may be given directly in 
parentheses (Sec. 4.8). 

A. 3. OPERATIONAL COMMANDS 

Some commands are limited to direct use only and others 
to indirect use only, but most may be used either way. This 
section groups the commands according to the category in 
which they fall and references their discussion in the text. 

Direct or Indirect Commands Section Reference 

Set x= CZU. 

Set x= ... a proposition. 

Let f= ... a formula. 
Let f= ... a proposition. 
Let f(a,b,c)= ... a function of a,b,c. 
General Rule: Use Let directly. 

Type □, CZ3, CZ3, _. 2.2-2.7 

Type CZD, 1=1 in form □. 2.2, 3.4 

Type formula f. 2.4, 2.5 

Type "ABCDE". 3.4 

Type step EZ3 . 4.7 



2.3 
2.9 

2.4 
2.7 
2.5 
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Direct or Indirect Commands (cont.) Section Reference (cont.) 

Type part CD . 4.7 

Type form dJ . 4.6, 4.7 

Type all steps. 4.7 

Type all parts. 4.7 

Type all forms. 4.7 

Type all formulas. 4.7 

Type all values. 4.7 

Type all. 4.7, 5.1 

Type size. 4.7 
Type time. 
Type users. 

Do step IZZL 3.2 

Do step CZI for x= CD, □, EZD(lZZl) □ . 3.3 

Do step CD, CD times. 3.3 

Do part CD. 3.2 

Do part CD for x=CD (CZH) CD (CD) CD. 3.3 

Do part CD, CD times. 3.3 

Line. 4.6 

Page. 4.6 

Delete step CD. 2.1 

Delete part CD. 2.1 

Delete form CZJ . 2.1 

Delete all steps. 2.1 

Delete all parts. 2.1 

Delete all forms. 2.1 

Delete x,y. 2.1 

Delete all values. 2.1 
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Direct or Indirect Commands (cont.) Section Reference (cont.) 



Delete all formulas. 
Delete all. 

Quit. 

Direct Only Commands 

Go. 

Cancel. 

Indirect Only Commands 

1. 1 To step □ . 
1.1 To part CZ3. 

1 . 1 Done . 

1. 1 Stop. 

1. 1 Demand x. 



2.1 
2.1 

3.7 
Section Reference 



1. 


3, 


4.7 


4. 


7 




Section 


Reference 


3. 


2 




3. 


2 




3. 


7 




3. 


7 




3. 


.3 





A. 4. FILE COMMANDS 

File commands follow the same rules as the operational 
commands. The format for item and file designators is an 
integer, a space, and a parenthetic code. File codes are 
5 characters; item codes are from 1 to 5 characters. See 
Chap. 5 for rules of use. 



Direct or Indirect Commands 



Use file 



(code) . 



Section Reference 



5.3 



File f,x,y as item I I (code) 



5.3 
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Direct or Indirect Commands (cont.) Section Reference (cont.) 

File formula f as item ZZ) (code). 5.3 

File step ZZI as item ZZI (code). 5.3 

File part ZZI as item ZZ) (code). 5.3 

File form ZZI as item ZZI (code). 5.3 

File all steps as item ZZ) (code). 5.3 

File all parts as item ZZI (code). 5.3 

File all forms as item ZZI (code). 5.3 

File all formulas as item ZZI (code). 5.3 

File all values as item CZI (code). 5.3 

File all as item ZZI (code). 5.3 

Recall item [ZZI (code). 5.3 

Discard item [ZZI (code). 5.3 

Type item- list. 5.3 

A. 5. DIRECT INPUTS 

JOSS recognizes , in addition to the above commands , the 
following direct-only methods of entering values and forms: 

Variable Definition Section Reference 

x= ZZI 

x= ... a proposition 

Form Definition 

Form ( 1 : 

distance: , accel: 





2. 


3 




2. 


,9 


Sect 


ion 


Reference 




3. 


.4 



Appendix B 
EXPRESSIONS AND PROPOSITIONS 

B.l. EXPRESSIONS 

In this text, the term expression (used alone) , or 
the symbol [ZZ1 , means a mathematical expression that is 
reducible to a number at the time JOSS interprets that ex- 
pression; Boolean expressions, or propositions, are ex- 
cluded. Generally, a number may be written as an expression 
anywhere in the language except as the step label on an in- 
direct command. 

Expressions are made up of one number or identifier 
or a combination of numbers and/or identifiers and/or JOSS 
functions related by the usual mathematical symbols. The 
symbols are conventional, except for the asterisk, which 
indicates exponentiation. 

Listed in their operational order of precedence, the 
symbols are 

l. I I, c ], ( ) 

2. * 

3. •, / 

4. + , - 

Conditional expressions are written 

(prop: CI3 ; prop: □; czi) 

and take the value of the expression IZZI following the first 
true proposition (Sec. B.3). 
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B.2. SOME RULES OF FORM FOR EXPRESSIONS 

Expressions are written in standard mathematical form, 
linearized to place the expression on a single line, follow- 
ing the order of precedence of the above section. "Eh?" in- 
dicates a violation of one or more of the following rules: 

• Each bracket, parenthesis, and absolute value sign 
must have a matching opposing member. 

• The lower-case el (l) may not be used for the one 
(l) ; the upper-case oh (0) may not be used for the 
zero (o) . 

• The dot (•) must be used to indicate multiplication. 

• Spaces may not appear within numbers , between a 
function and its argument bracket, and between a 
variable and its index bracket. 

• Single- letter identifiers only may be used. 

• Identifier subscript use must be consistent with the 
identifier definition. 

B.3. PROPOSITIONS 

Propositions (Boolean expressions) are composed of 
expressions related by 

=, *, *> *> <y > 

and the negation 

not. 

If there is more than one relational statement, they are 
joined by the logical operators 

and, or. 

Each proposition has a logical value of true or false. 



B.3. PROPOSITIONS 71 



The order of precedence of operations within a 
proposition is 

1. evaluation of expressions (Sec. B.l) 

2. ( ) from inside outward 

3. relational operations 

4. not 

5. and 

6. or 



Appendix C 
FUNCTIONS 

C.l. JOSS FUNCTIONS 

The available JOSS functions, along with explanations 
of their use, are listed in this appendix. Rules of form 
are covered in Sec. B.2. 

Function Explanation 

sqrt(cz]) Square root. The argument must have a value 
^ zero, 
log (cm) Natural logarithm. The argument must have 
a value > zero. 

exp([ZZl) Exponential. The argument x must be such 

_. _ x ^ ,,,100 Tr x , n -99 

that e < 10 If e < 10 , the result 

will be zero. 

sin([ZZl) Sine and cosine. The argument is assumed to 

cos(fZZl) , . ,. , ^ , 

be in radian measure and must have a magni- 
tude < 100. 
ip(CZ3) Integer part. ip(-22026. 4658) = -22026 
fp([=H) Fraction part. fp(-22026.4658) = -.4658 
dp([=]) Digit part. dp(-22026.4658) = -2.20264658 
xp(r=l) Exponent part. xp(-22026.4658) = 4 
sgn(CZl) The value of the signum function is +1 for 
an argument greater than zero, for an ar- 
gument equal to zero, and -1 for an argument 
less than zero. 
tv(prop) The truth value function converts its argu- 
ment, which is a proposition, into the num- 
ber 1 if p is true, and if p is false. 
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Function 



Explanation 



arg ( CZ , CZI ) The argument function requires two arguments, 
separated by a comma, and as a result gives 
the angle between the positive x axis of the 
x,y plane and the line joining the point 
(0,0) and a point (x,y). The result is in 
radian measure, -rr < ar g ( CZ) , CZ ) s tt. The 
value of arg (0,0) is zero. 



sum(i=CZl(CZl)[ 



p r o d ( i= CD ( CZI ) CZI 

max ( i= CZ ( CZ) ) CZI 

min(i=CZl(lZZl)CZ! 

f ir s t ( i= CZ3 ( CZI ) CZ 



•) 
.) 
•) 
.) 



some function of i 

some function of i 

some function of i 

some function of i 

some proposition in i ...) 
The five iterative functions, sum , product , 
maximum, minimum , and first , take two argu- 
ments: an iteration expression such as that 
in a for clause, and, separated by a colon, 
the expression (or proposition) to which the 
iteration is to apply. The variable of iter- 
ation i is a dummy; no real identifier is af- 
fected in any way. 

For all but the first function, the in- 
dicated operation is applied repeatedly, and 
the function gives the resulting numeric value. 
(For these functions, arguments may also be 
given in list fashion: sum( CO, CD, CZI, CH, 
CZI) etc.) In contrast, the first function 
gives the first value of the index i for which 
the proposition is satisfied. 
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C.2. USER- DEFINED FUNCTIONS 

We may define other functions, with 1 to 10 arguments, 
using the Let command. Any single- letter identifier may 
represent the function, and any distinct single letters 
may be used as dummies. The use of the letters as dummies 
does not affect their concurrent use as identifiers. 

A few commonly used functions are listed below, but 
the number of possibilities is unlimited. Any convenient 
identifier may be substituted in place of f , D, I, S, and 
L. The arguments (x) , (f,a,b) are dummies. (See Sees. 
2.5 and 2.8.) 

Tangent 

Let f (x)=sin(x) /cos (x) . 
Arc sin 

Let f (x)=arg(sqrt(l-x*2) ,x) . 
Arc cos 

Let f (x)=arg(x,sqrt(l-x*2)) . 
Arc tan 

Let f (x)=arg(l,x) . 
Arc sec 

Let f(x)=arg(l/x,sqrt(l-l/x*2)). 
Arc esc 

Let f(x)=arg(sqrt(l-l/x*2) ,1/x). 
Arc cot 

Let f (x) =arg (x , 1) . 
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Derivative of a function of a variable 

Let D(f ,x) = [f(x+. 0001) -f(x)]/. 0001. 

(Note: Depending on the function f , another value may 
be needed in place of .0001.) 

Integral of a function from lower limit to upper limit 

Let I(f ,a,b)-(b-a)/n/3- (f [a]+f [b]+S[f ,a,b]) . 

Let S(f,a,b)=sum(i=l(l)n-1: [3- (-l)*i ]• f [a+i- (b-a) /n ]) . 

n=100 

(Note: n must be even.) 

Log to base 10 

Let L(x) = log(x)/log(10). 

Factorial 

Let f(x) = [x=0: 1; fp(x)=0: prod (i=l(l)x: i) ]. 

C.3. CONSTANTS DERIVED FROM THE FUNCTIONS 
The constant pi may be defined by 

p=arg(-l,0) 

Another frequently used constant, for converting de- 
grees to radians, may then be defined by 

k=p/180 
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or if p has not been defined as pi, the radians/degree con- 
stant is defined by 

k=arg(-l,0)/180 

JOSS gives us the constant e, the base of natural log- 
arithms, directly through the exponential function, exp(l) . 
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1.00 PAGE. 

1.01 DEMAND V AS " STARTING VELOCITY'. 
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iANO L AS '* PRINTOUT TIEE STEP (IN SECONDS)". 
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1 .Of; TO STEP 1 .03 IF L:0. 

1 . OC- SET T=L/10. 
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1 .12 SET X=Q. 

1.13 SET Z=0. 
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2. 
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02 

03 
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05 
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14 

15 
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STARTING VELOCITY = -1 00 

LOOP G- VALUE = *£ 

PRINTOUT TIME STEP (IN SECONDS) =" 

TIME LIMIT (IN REAL-TIME MINUTES) 

IS ENERGY CONSERVED? (TRUE/ FALSE) 



■TRUE 
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[12] 



SPEED = IOC. 00 METERS/SACOND. 
ENERGY IS CONSERVED. 



2.00 "G" LOOP. 



1.0 


S 


99. « 


x 


4.9 


7 


101 1.3 


R 


5.6 


DEG 


99.8 


M/S 


2.0 


s 


198.1 


x 


19.6 


z 


9 83 . 8 


R 


11.3 


DEG 


99.0 
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3.0 


s 
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X 


43.8 


7 
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R 
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4.0 


s 
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x 
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z 


876.0 


R 
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5.0 


c 
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x 
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7 


800.1 
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6.0 


s 
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x 
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R 
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s 
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x 
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44.7 


DEG 


88.0 


M/S 
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s 
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7 
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s 
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z 
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x 
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z 
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X 
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X 
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STARTING VELOCITY = «-l 00 
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SPEED = 100.00 METERS/S: 
CONSTANT-VELOCITY LOOP. 
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x 
x 

x 

X 

x 
x 
x 
x 
x 
x 
x 

X 
y 

X 

X 

X 

x 

x 

y 

X 

x 
x 
x 
x 

X 
y 
y 

x 

x 

y 

x 
x 

x 

Y 



:\n 



4.9 Z 

IS. 6 Z 

44.1 Z 

I?. A Z 



"G" LOOP. 



122.5 
176.1 
23?. 3 
311.5 
392 . 2 
^0.6 
575.2 



Z 

7 

z 

7 

z 
z 

673.=* Z 

7 73.6 Z 

870.4 Z 

95 S. 2 Z 

1C3 3.R Z 

10*8.0 z 

1116.6 Z 

1M6.5 Z 

10*7.6 Z 

1033.2 Z 

S5 C .4 Z 

r 6?.5 Z 

772.6 Z 

6 72. S Z 

574.2 7 

7 

z 
z 

7 

z 

7 



4 7S. 7 
391.4 
3 10. F 
23". 6 
175. f 
122. C 
78.1 



1 r"<4 Z 



1015.3 
1001.2' 
9 77.9 
946.0 
906.4 
860.4 
80S.1 
754.1 
697.0 
63 9.3 
5 82 . S 
529.2 
479.9 
436.3 
3 S S . 7 
3 71.2 
• 351.5 
341 .4 
340.9 
350.2 
' 36S.C 

3 96.* 

432.6 

4 75.6 
524.5 
577.9. 
63 4.1 
691.7 
74 9.0 
804.2 
855.9 
802.5 
842.7 
875.3 
998.5 

1014.4 
1 C 1 9 . 7 



ft 

ft 
ft 
F 
R 
R 
R 
R 
R 
ft 
R 
R 
R 
R 
R 
R 
R 
R 
R 
R 
R 
R 
P 
R 
R 
R 
R 
R 
R 
R 
F 
R 
R 
R 
R 
R 



5.6 DEG 

'. 11.3 DEG 

17, 1 DEG 

23.1 DEG 

2 9.3 DEG 

35.8 DEG 
42.6 DEG 
50. DEG 

57.9 DEG 
66.6 DEG 
76. C DEG 
86.3 DEG 
97.8 DEG 

110.4 DEG 

124.2 

139.1 

155'. 1 

171.7 

•171.5 DEG 

•154.9 DEG 

•139.0 DEG 

•124.0 DEG 

•1 10.2 DEG 

-97.7 DEG 

-86.2 DEG 

-75. 9 -DEG 

-66.5 DEG 



DEG 
DEG 
DEG 



-5 7.9 
-49. 9" 
-42.6 
-35.7 
-29. 2 
-23 .0 
-17.0 
-1 1.3 
-5.6 



DEG 
DEG 
DEG 
DEG 
DEG 
DEG 
DEG 
DEG 
DEG 



100.0 
100.0 
100.0 
100,0 
10C.0 
100.0 
100.0 
1C0.0 
100.0 
10C.O 
100.0 
100.0 
100.0 
100.0 
100.0 
1CO.0 
100.0 
100. 
100.0 
100.0 
1C0.C 
100.0 
100.0 
100.0 
10 0.0 
100.0 
100.0 
1C0.0 
100.0 
100.0 
10C.O 
100.0 
100.0 
1C0.C 
100.0 
180.0 



M/S 

IV s 

jY"/S 

M/S 
M/S 
TVS 
M/S 

M/S 

m/s 

M/ S 
M/S 

M/S 

m/s 

M/S 
M/S 
M/S 
M/S 
-M/S 
M/S 
M/S 
M/S 
M/S 
M/S 

vs 

v / c 

M/S 
M/S 
M/-S 
M/S 
M/S 
M/S 
M/S 

y / c 

M/S 
"/ c 
•• / ' 



STARTING VELOCITY = «-l 00 

LOOP G- VALUE = «-2 

PRINTOUT TIME STEP (IN SECONDS) = «-l 

TIME LIMIT (IN REAL-TIME MINUTES) = *-5 

IS ENERGY CONSERVED? (TRUE/FALSE) = *-TRU! 



1156 4/15/71 



* 11 



[2 1 ] 



■ SPEED 


Z 


100. OC ME 


:ters/secqnd. 




2.00 "G" . 


LOOP 


• 








ENERGY 


' I! 


5 CONSERVE 


:d. 


















1.22 1 SET 


' V: 


:-V. 




> 
















1.222 SET 


' Q' 


(1)=-V. 




















1.0 


S 


-19. A 


X 


-S.4 


7 


345.1 


R 


-166.6 


DEG 


. 100.5 


M/S 


2.0 


S 


-173.1 


x 


-46.6 


7 


369.1 


R 


-15.0.3 


DEG 


102.3 


M/S 


3.0 


S 


-255.1 


Y 


-1CS.3 


7 


4 12.7 


F 


-135.2 


DEG 


105.2 


M/S 


4.0 


s 


-320.9 


Y 


-193.2 


7 


475.6 


R 


-121.4 


DEG 


109.1 


M/S 


5.0 


5 


-367.9 


Y 


. -293.5 


.1 


557.3 


R 


-109. 1 


DEG 


1 13.5 


.M/S 


6.0 


q 


-3 94.9 


Y 


-405.7 


z 


656.8 


■R 


-98.3 


DEG 


IIP. 2 


M/S 


7.0 


S 


-401.9 


y 


_ c; o c, r? 


z 


7 72 . 6 


■R 


-88. 7 


DEG 


123.1 


M/S 


8.0 


S 


-3^9.4 


x 


-650.3- 


7 


903.0 


R 


-80.1 


DEG 


. 128. 


M/S 


9.0 


s 


-358. 4 


x 


-776.6 


7 


1045. P 


R 


-72.5 


DEG 


' 132.7 


M/S 


10.0 


s 


-310.2 


x 


-902. 4 


7 ■ 


1198.7 


R • 


-65.7 


DEG 


137.3 


M/S 


11.0 


s 


-24 5.9 


X 


-1025.9 


7 


1359.0 


R 


-59.5 


DEG 


141.6 


M/S 


12.0 


s 


-166.9 


X 


-1145.6 


Z 


1524.1 


R 


-53.8 


DEG . 


145.7 


MS 


. 13.0 


s 


-74.3 


X 


-1260.3 


7 


' 1691.5 


R 


-48.5 


DEG 


149.5 


M/S 


14.0 


s 


30. 5 


X 


-1369.2 


x 


1858.4 


R " 


-43.7 


DEG 


153.1 


M/S 


15.0 


s 


14 6.4 


X 


-1471.3 


z 


2022.3 


R 


-39.1 


DEG 


156.3 


M/S 


16.0 


s 


272.3 


X 


-1566.1 


7 


2180.7 


R 


-34.9 


DEG 


159.2 


M/S 


17.0 


s 


407.2 


X 


-1653.0 


z 


2331.4 


.R 


-30.8 


DEG 


161.9 


M/S 


18.0 


s 


549.9 


x ■ 


-1731.6 


z 


24 72.2 


R 


-26.9 


DEG 


164.3 


M/S 


1 S.O 


s 


699.5 


x 


-1801 .6 


z 


26C1.0 


R 


-23.2 


DEG 


166.3 


M/S 


20.0 


s 


£55.2 


x 


-1862.5 


z 


2716.2 


R ' 


-19.6 


DEG 


168.1 


M/S 


21.0 


s 


" 1015. S 


X 


-1914.3 


7 


2816.1 


R 


-16.1 


DEG 


169.6 


M/S 


22.0 


s 


1 180.7 


X 


-1956.6 


z 


2899.5 


R 


-12.7 


DEG 


170.8 


M/S 


23.0 


s 


1348. P 


x 


- 19?9.4 


z 


2965.2 


R 


-9.4 


DG 


171.8 ! 


VS 


24.0 


s 


15 IS. 3 


X 


-2012.5 


z 


3012.5 


R 


-6.1 


DEG' 


172.4 


M/S 


25.0 


s 


1691.4 


X 


-2025.9 


z ■ 


3C40.6 


R 


-2.8 


DEG 


1 72. 8 


M/S 


26.0 


s 


1864.2 


X 


-2029. 5 


z 


3049.2 


R 


.4 


DEG 


172.9 


M/S 



1 159 4/15/71 #11 HMM 813 



[22] 



STARTING VELOCITY = -100 

LOOP G- VALUE = *2 

PRINTOUT TIME STEP (I.m SECONDS) '= -1 

TIME LIMIT (IN REAL- TIM MIMUT^S) r <- 

I-S EMEPGY CONSERVED? ( TRUE/FALSE) '™ 



-TRUE 



121 1 



4/15/71 



#11 



E13 



[3 1 



SPEEO = 100.00 METERS/SECOND. 
ENERGY IS CONSERVED. 







LOOP. 



1.0 S 



fr 



V 



6- 



£* • u 


. b 


£ • u 


s 


4.0 


s 


5'.0 


s 


6.0 


s 


7.0 


s 


F.C 


s 


9.0 


s 


„ 10.0 


S 


11.0 


S 


— >* 12.0 


s 


13.0 


s 


14.0 


s 


15.0 


s 


16.0 


s 


17.0 


s 


18.0 


s 


1S.0 


s 


20.0 


s 


21.0 


s 


22.0 


s 


23.0 


s 


24.0 


s 


25.0 


s 


25.0 


s 


27.0 


s 


28.0 


c 


23. 


s 


30.0 


s 


31.0 


s 


32.0 


s 


33.0 


s 


34.0 


s 


35.0 


s 


36.0 


s 


37.0 


s 


3P.0 


s 


S 39. C 


s 


40.0 


s 



4 1.0 5 
42.0 SC 



9?. c 


\^ 


4.9 


7 


101 1.3 


; ft 


5.6 


uii to 


99.8 


M/S 


1S P . 1 


Y 


19.6 


z 


383. 8 


R 


1 1.3 


DEG 


33.0 


M/S 


2 93.6 


Y 


43.^ 


7 


S3 8. 1 


R 


17.2 


DEG 


3 7. P 


M/S 


3^4.6 


Y 


77.4 


•j 


*76.0 


R 


23.4 


DEG 


■36.1 


M/S 


4 69.7 


Y 


120.0 


7 


FOO. 1 


R 


29.9 


DEG 


33.9 


M/S 


547.1 


Y 


171 .0 


7 


713.4 


r, 


37.0 


DEG 


31.2 


M/S 


615. 1 


Y 


22 9.6 


7 


619.7 


r 


44.7 


DEG 


88.0 


M/S 


671 .7 


X 


2 34 . R 


7 


523. 1 


R 


53.5 


DEG 


84.3 


M/ S 


714.9 


Y 




z 


42 8.1 


R 


63.6 


DEG 


80.1 


M/S 


742.5 


y 




z 


339.1 


R 


75.4 


DEG 


75.5 


M/S 


752.3 


X 


51C.3 


7 


260.6 


R 


89.7 


DEG 


70. 7 


M/S 


750.5 


y 


5 85.7 


z 


15F87.4 


R 


\ 91.6 


DEG 


65.2 


M/S 


74^.6 


x 


64^.7 


7 


1 1645.6' 


'r 


31.9 


DEG 


60.3 


M/S 


746.5 


X - 


706. P 


z 


83 15.4 


R 


92.2 


DEG 


55.4 


M/S 


744.3 


Y 


753.9 


z 


5756.1 


R 


92.7 


DEG 


50.5 


M/S 


741 .R 


X 


pes. r 


7 


3 83 8.6 


R 


93.3 


DEG 


4 5.6 


M/S 


73 9.1 


X 


P51.3 


z 


2445.7 


R 


94. 1 


DEG 


40.6 


M/S 


735. S 


V 


883.6 


z 


1471. R 


R 


35.3 


DEG 


35.7 


M/S 


732.4 


x 


.' 322. . 9 


7 


823.3 


R 


37.1 


DEG 


30.8 


M/S 


708.2 


X 


951 .2 


7 


418.3 


R 


100.0 


DEG 


25.9 


M/S 


723 . 2 


Y 


974.4 


7 


186.7 


R 


105.0 


DEG 


21.1 


M/S 


717.0 


X 


392.3 


7 


70.3 


R 


1 15.0 


DEG 


16.4 


M/S 


708.9 


X 


1004.2 


7 


22.9' 


R 


137.3 


DEG 


12.3 


M/S 


698.8 


X 


1008.3 


7 


11.4 


R 


-177.1 


DEG 


. 10.6 


M/S 


689. 1 


X 


10 03. 3 


Z 


22.0 


R 


-133.3 


DEG 


12.7 


M/S 


681.7 


x 


331 .0 


z 


68.6 


R 


-112.7 


DEG 


16.8 


M/S 


676.1. 


x 


373.0 


z 


185.9 


R 


-103.6 


DEG 


2 1.4 


M/S 


671.6 


x 


950.0 


z 


423.4 


R 


-99.0. 


DEG 


26. 1 


M/S 


667.3 


x 


92 1.9 


7 


84 4 . 5 


R 


-96.3 


DEG 


31.0 


M/S 


664. P 


x 


8*8.3 


z • 


152 6.4 


R 


-94.7 


DEG 


' 35.8 


M/S 


66-2.0 


x 


851.0 


7 


2555.8 


R 


-93.6 


DEG 


40.7 


M/S 


653.6 


x 


808.2 


7 


4C49.1 


R 


-92.3 


DEG 


45.5 


M/S 


657.4 


X 


760.6 


z 


61 12.4 


R 


-32.4 


DEG 


50.4 


M/S 


655.5 


x 


70^.0 


7 


8881.6 


R 


-32.0 


DG 


55.3 ' 


<vs 


653.7 


y 


650.5 


7 


12502.3 


R 


-31.7 


DEG 


60.2 


M/S 


652.0 


x 




7 


17133.8 


R 


-91.4 


DEG 


65. C 


M/S 


650.5 


X 


521.0 


z 


22 94 9.-1 


R 


-31.2 


DEG 


69.9 


M/S 


649.0 


X 


448.? 


7 


30134. S 


R 


- 9 1 . -1 


DEG 


74. c 


M/S 


6/57.7 


X 


3 7 I . S 


7 


38891.9 


3 


-90.9- 


DEG 


79.7 




6^6.4 


Y 




7 


45434.1 


R 


-30.^ 


DEG 


n4.r 


M/S 


6^5.2 


X 


203.2 


7 


61S89.7 


r< 


-30.7 


DEG 


^3.5 


M/S 


644.1 


x 


111.5 


7 


76800.5 


R 


-90.7 


DEG 


94.4 


M/S 



TIMER r 



5. 1^ 



Si'AK'ii.vo .v ; ;.L Jul i Y = *- 

I'M- AT STEP 1.01. 

^-DELETE ALL. 

«-nn.CALL ITEM 4 (TURN). 

DOS'. 

*-TYPE ALL. 



"HEADING 
"SPEED C 



.00 PAGE. 

.005 SET JrO. 

.006 SET T=0. 

.01 DEMAND 3 AS 

.02 DEMAND V AS 

.03 DEM AMD A AS " TURMTM6 

.03 1 TO STEP 1.07 IF* Ar'o/ 

.03 5 SE A=A£G. 

.04 TO STEP 1.03 IF G>A. 

.05 1 SET L= FALSE. 

.052 SET. Rr TRUE. 

.053 DEMAND ft AS " TURN DIr 



AZIMUTH (DEGREES)" IF' J=C. 
ETEFS/SECONO)" IF JrO. 



.06 
.07 

.08. 

.10 

, 11 

.13 
.14 
.15 
.16 
.17 



IF R2TRUE. 



SET RrFALS 

LIVE. 

DEMAND D AS "TIME INCREMENT". 

DEMAND y\ AS " NUMBER OF TIME STEPS" 

SET M=IPOH-0.5). 



Mil ON? (L=LEFT, Rr RIGHT)" 



TO STEP 1.0S IF M<1 . 
DEMAND X AS "STARTING X 
" L ~-'!AMD Y AS "STARTING Y 



COORDINATE" IF JrO. 
COORDINATE" IF JrO. 



LIN: 

LINE. 

SET ZrO. 017453294^3. 
.1? TYPE d IN FORM 1. 
.IS TYPE V IN FOR* 2. 
.121 TYPE "STRAIGHT FLIGHT" IF ArO. 
. 1S2 TO STEP 1.23 IF ArO. 
.20 TYPE A/G IN FORM 3. 
.21 TYPE "RIGHT TURN." IF R. 
.22 TYPE "LEFT TURN." IF (NOT R) . 
.221 TYPE S IN FORM 31. 

.222 TYPE (1.5707S646-FC G/A) 5/0.0174532S4 IN FORM 32. 

.23 LINE. 

.24 LIME. 

.2 5 TYPE J, T, B, X, Y IN FORM 4. 

.251 TO STEP 1.32 IF ArO. 

.26 TO STEP 1.30 IF R. 

.27 DO PART 3 FOR 1= 1 ( 1 ) .v„ 

.2? TO STEP 1.33. 

.2 9 *. 

.30 DO PART 2 FOR 1=1 (1)M. 

.31 TO STEP 1.33. 

.32 DO PART 5 FOR 1=1(1) M. 

.33 LINE. 

.34 PAGE. 

.35 TO STEP 1.01. 



2. 00 
2.01 
2.02 
£ . 03 
2 .04 
C.05 
2.06 

3.00 
3.01 
3.02 
3.03 
3.04 
3.05 
3.06 

^.00 
4.01 
4.02 
4.03 
4.04 
4.05 
4.06 
4.07 
4.0? 

5.00 
5. 01 
5.02 
5.03 
5.04 



SET J=Jfl. 

SET T=T+D. 

SET C3H&Q/S. 

SE T X= X+ S* C COS ( 7) - C OS ( 7+C ) ) 

SET Y=Y+S&( SIKC 7+C)-£TM( 7))' 

SET Z=Z+C. 

DO PART 4. 

SET Jrjfl. 
SET T=T+D. 
SET C=Vd-0/S. _~ 

c : T x= x- $& ( cos c - z) - c on o> ? y> 

~E T Y= Y+ S& ( SI N fC-?) - S I vf^yf 5 * 

SuT z=z-c. v_y 

DO PART 4. 

TO STEP 4.03 IF 7^0. 

SiT 2'rZ+6.2?3 IP5PZ:. 

TO STEP 4.00. 

TO STiP 4.06 IF Z<6.2P3l^5f5 

SET Z=Z-6.2."3 1P5P4. 

TO STEP 4.03. 






SE 

TYPE 

PAGE 



l "-Z/0.0174532S4. 

J, T, 3, X, Y IN FOR)', 4' 
IF S>40. 



SET cfcjfl. 

SET T=T+D. 

SET X=X*-V4D4SIN( 7). 

SET Y= Y+V&D&COSC 7) . 

DO PART 4. 



FORM 1: 

HEADING AZIMUTH = ttt. tt DEGREES. 



pi £ : ■ 
SPEED = ttttt. tt METERS/SECOND. 

FO.RX 3: • 

TURNING G VALUE = TT. tt. 

FORM 4: 
TTT TTT.TT S TTT.TT DEG TTTTTT.TT X 

FORK 3 1: 

TURNING RADIUS = TTTTTTTT. TT X^T^RS 

FORT') 32: ' 

SANK A\'3LE = TTTT. T DEGREES. 



TTTTTT. TT Y 



F(X): ARGC SQRT(1--X*2),X) 
FU.5 7C7 564 6-G/A) 
V*2/(A<?:SI\'(1 .57C7S6/6-FC G/A))) 



A 
3 

C 

D 
G 
I 

o 

L 



V 

Y 
Y 




1PP.C4' 

. 166430317 
4 
9.°07 
1 
1 
FALSE 

1 
TRUil 
^0 
5CC 
6456.?SC4 r 
17-^.4274 
3.2"i$174 



12 Of 



4/15/71 



*' 1 1 Hi v ^' 



[25 ] 



«-D0 PART 1. 



li y-v,'. 



PI. 



[26 ] 



HEADING AZI. V !UTM ( DEGREES) = <-0 
SPEED ( XETERS/SECOND) = HOC 
TURNING 3 = <-2 
TURN DIRECTION? (L=LEFT, p.= r I ?HT) 



ilrii I ivoKi'.'ii"! 1 



-i 



nuesi 



OF TIME STEPS r 



STARTING X COORDINATE 
STARTING Y COORDINATE 



■«-0 



HEADING AZIMUTH = .00 OE~EEES, 

SPEED = ICC. 00 "iETZRS/SICOND. 
TURNING 3 TALUE = .2. CO. 
RIGHT TURN. 



TURNING RADIUS = 



5 PP. 71 



60.0 DEGREES. 



icr.'b, 





.00 


c 


.00 


or g 




y 


.CO 


Y 


1 


l.OC 


s 


?.73 


DEG 


P. 47 


x 


SS.52 


Y 


2 


\ 2 . CO 


c 


19.46 


iJ 1- 's> 


33.65 


x 


196. IP 


y 


3 


3. 00 


s 


2S.20 


DEG 


74. ^C 


x 


2E7.T? 


V 


4 ■ 


4.00 


s . 


3 3.93 


i;lE \.. 


13 0.74 


X 


' 36S.S3 


Y 


5 


5. v 00 


s 


4?. €6 


.'_■' u ^ 


1S?.E7 


X 


' 442. C2 


Y 



1207 



4/15/71 



#11 h: 



'13 



[2 7] 



TURNING' G = . *-0 

TIKE INCREMENT = <-5 
NUMBER OF TIME STEPS 



HEADING- AZIMUTH c 4P.66 DEGREES. 
SPEED = 100.00 METERS/SECOND.' 
STRAIGHT FLIGHT 



5.00 


c 


4^.66 DEG 


15S.T7 X 


442.02 Y 


10. OC 


S 


4P.66 DEG 


5 75.?;? X 


~ 772.27 Y 



TURNING G =■ ♦■£ ' 

TURN DIRECTION? <L=LEFT, R= RIGHT) 

TIME INCREKSMT = -1 
NUMBER OF TI.Y-Z STEPS r <-5 



= «-L 



HEADING AZIMUTH = 4P.66 DEGR; 
SPEED : 100.00 ^IFTiR^/Sf'CrvM; 

TURNING G VALUE = £.00. 
LEFT TURN. 

TURNING RADIUS r 5P?.71 : 

RANK ANGLE = 60.0 DEGREES. 



TF>? 



6 


10.00 


b ' 


A^.ee 


n T O 


5 7 5.2? 


X 
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TURNING- G = <- 

1*^1 AT STEP 1.03. ' 

-DELETE ALL. 

*-U* 

-RECALL ITEM 5 (LOOP). 

DONE. 

*£.COl SET Ar.O IF Q(l)>W/2. 

<-_'0Q PART 1. 



